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SEQ 0001 



PRODUCT CODE: 



AC-8740C-MC 



PRODUCT NAME: 



C2DVDC0 DV11 ROM TST PRT2 



DATE RELEASED: 



FEB-1978 



MAINTAINER: 



DIAG-MK 



AUTHOR: 



J EGOLF d VALJES 



THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION . DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILIW FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED UNDER A 
LICENSE AND MAY ONLY BE USED OR COPIED IN ACCORDANCE WITH THE 
TERMS OF SUCH LICENSE. 

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE 
USE OF RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT 
SUPPLIED BY DIGITAL. 

COPYRIGHT (C) 1975,1978 DIGITAL EQUIPMENT CORPORATION 
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SEQ 0002 



1 . 



ABSTRACT 



THE FUNCTION OF THE DV1 1 DIAGNOSTICS ARE TO VERIFY THAT THE OPTION 
OPERATES ACCORDING TO SPECIFICATIONS. THE DIAGNOSTICS VERFIY THAT THERE 
ARE NO MALFUNCTIONS AND THE ALL OPERATIONS OF THE DV1 1 ARE CORRECT IN 
ITS ENV I ROMENT . 

PARAMETERS MAY BE SET TO ALERT DIAGNOSTICS AS TO THE DV1 1 CONFIGURATION 
BY USING THE "TRIAL" PROGRAM ( DZDVE SA:210) . ALL QUESTIONS SHOULD BE 
ANSWERED AND THEN EACH DIAGNOSTIC WILL "OVERLAY" THESE PARAMETERS WHICH 
ARE STORED IN THE "STATUS TABLE" (SEE SECTION 8.4A). THE ALTERNATIVE TO 
"TRIAL" PROGRAM IS "AUTO SIZING" (SEE SECTION 8.5). 

DZDVD LIKE DZDVC ALLOWS THE MICRO PROCESSOR TO "FREE RUN". BECAUSE OF 
THE LENGTH OF THE "FREE RUNNING" TEST; THIS TEST IS TO CATCH THE 
OVERFLOW FROM DZDVC. 

CURRENTLY THERE ARE SIX OFF LINE DIAGNOSTICS THAT ARE TO BE RUN IN 
SEQUENCE TO INSURE THAT IF AN ERROR SHOULD OCCUR IT WILL BE DETECTED AT 
AN EARLY STAGE AND INSURING THAT DIAGNOSIS OF ERROR WILL BE IMMEDIATE TO 
PROBLEM 

NOTE: ADDITIONAL DIAGNOSTICS MAY BE ADDED IN THE FUTURE. 
THE SIX DIAGNOSTICS ARE: 

1. DZDVA [REV] BASIS R/W TEST AND ROM INSTRUCTION EXERCISER . 

2. DZDVB [REV] STATIC LINE CARD TESTS. 

3. DZDVC [REV] » FREE RUNNING 1 ROM TESTS PART 1 ♦ 

4. DZDVD [REV] 'FREE RUNNING 1 ROM TESTS PART 2. 

5. DZDVE [REV] MODEM CONTROL AND CABLE TESTS PLUS MANUAL PARAMETER 
INPUT. [TRIAL PROGRAM] 

6. ASYNCHRONOUS LINE CARD TESTS. 



ANY PDP11 FAMILY CPU (WITH MINIMUM 8K MEMORY) 

ASR 33 (OR EQUI LI VALENT ) 

DV11-AA MUX CNTRL UNIT 

AT LEAST ONE OF THE FOLLOWING 

DV11-BA 8 LINE SYNC MODULES 

DV11-BB 8 LINE ASYNC MODULES 

DV11-BC 4 SYNC LINES, 4 ASYNC LINES 



2. 



REQUIREMENTS 



2.1 



EQUIPMENT 
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SEQ 0003 



2.2 STORAGE 

PROGRAM WILL USE ALL 8K OF MEMORY EXCEPT WHERE ABL AND BOOTSTRAP LOADER 
RESIDE. LOCATION 1500 THRU 1736 ARE ESPECIALLY TO BE NOTED AND TO BE 
UNTOUCHED BY OPERATOR AFTER DV11 TRIAL PROGRAM HAS BEEN EXECUTED; OR 
AFTER THE 'AUTO SIZING 1 HAS BEEN DONE. 

3. LOADING PROCEEDURE 

3.1 METHOD 

ALL PROGRAMS ARE IN ABSOLUTE FORMAT AND ARE LOADED USING THE ABSOLUTE 
LOADER. NOTE: IF THE DIAGNOSTICS ARE ON A MEDIA SUCH AS DISK 
f MAGTAPE, DECTAPE, OR CASSETTES FOLLOW INSTRUCTIONS FOR THE MONITOR 
WHICH HAS BEEN PROVIDED ON THAT SPECIFIC MEDIA. 

ABSOLUTE LOADER STARTING ADDRESS *500 



MEMORY 


* SIZE 


4K 


17 


8K 


37 


12K 


57 


16K 


77 


20K 


117 


24K 


137 


28K 


157 



3.1 .1 PLACE ADDRESS OF ABS LOADER INTO SWITCH REGISTER* 

(ALSO PLACE •HALT* SW UP) 

3.1.2 DEPRESS 1 LOAD ADDRESS 1 KEY ON CONSOLE AND RELEASE. 



3.1 .3 DEPRESS 'START KEY 1 ON CONSOLE AND RELEASE (PROGRAM SHOULD NOW BE 
LOADING INTO CPU) 
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STARTING PROCEEDURE 

A. SET SWITCH REGISTER TO 000200 

B. DEPRESS 1 LOAD ADDRESS 1 KEY AND RELEASE 

C. SET SWR TO ZERO FOR 'AUTO SIZING 1 OR LEAVE 

LEAVE SWR BIT 7=1 TO USE EXISTING PARAMETERS SET UP BY DV1 1 TRIAL 
PROGRAM OR A PREVIOUSLY RUN DV11 DIAGNOSTIC THAT USED THE 1 AUTO 
SIZING 1 . (SECTION 7.2 AND 8.4,8.5 MAY BE 'lELPFUL) 

D. DEPRESS 'START KEY' AND RELEASE THE PROGRAM WILL TYPE MAINDEC NAME 
AND PROGRAM NAME (IF THIS WAS THE FIRST ST-RT UP OF THE PROGRAM) AND 
ALSO THE FOLLOWING: 



1 MAP 


OF DV11 STATUS 


1500 


1 75000 


1502 


000303 


1504 


000226 


1506 


000062 


1510 


000226 


1512 


000062 


1514 


000226 


1516 


000062 


1520 


000226 


1522 


000062 



THE ABOVE IS ONLY AN EXAMPLE! THIS WOULD INDICATE THE STATUS TABLE 
STARTING AT ADD. 1500 IN THE PROGRAM. THE STATUS TABLE MUST BE 
VERIFIED BY THE USER IF AUTO SIZING IS DONE . FOR INFORMATION OF STATUS 
TABLE SEE SECTION 8.4 FOR HELP. 

THE PROGRAM WILL TYPE 'R' AND PROCEED TO RUN THE DIAGNOSTIC 
CONTROL SWITCH SETTINGS 

NOTE: IF THERE IS NO kEAL SWR (177570); SWR MAY BE MODIFIED AT 
L0C:176 OR BY HITTING CONTROL W G" <~G> ON CONSOLE TERMINAL. 



sw 


15 


SET: 


HALT ON ERROR 


sw 


14 


SET: 


LOOP ON CURRENT TEST 


sw 


13 


SET: 


INHIBIT ERROR PRINT OUT 


sw 


12 


SET: 


INHIBIT **ALL** TYPE OUT/BELL ON ERROR. 


sw 


1 1 


SET: 


INHIBIT ITERATIONS. (QUICK PASS) . 


sw 


10 


SET: 


ESCAPE TO NEXT TEST 


sw 


09 


SET.: 


LOOP WITH CURRENT DATA 


sw 


08 


SET: 


CATCH ERROR AND LOOP ON IT 


sw 


07 


SET: 


USE PREVIOUS STATUS TABLE. CLR-DO AUTO 


sw 


06 


SET: 


RESERVED 


sw 


05 


SET: 


RESERVED 


sw 


04 


SET: 


RESERVED 


sw 


03 


SET: 


RESERVED 


sw 


02 


SET: 


LOCK ON SELECTED TEST 


sw 


01 


SET: 


RESTART PROGRAM AT SELECTED TEST 


sw 


00 


SET: 


RESELECT DV11'S DESIRED ACTIVE. 
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SEQ 0005 



4.1.2 



SWITCH REGISTER RESTRICTIONS 



SW 00 



METHOD: 



A: 
B: 
C: 
D: 



E: 
F: 



RESELECT DV11 'S DESIRED ACTIVE. PLEASE NOTE THAT A MESSAGE IS 
TYPED OUT FOR SETTING THE SWITCH REGISTER EQUAL TO DV1 1 1 S 



ACTIVE. THIS MEANS IF THE SYSTEM HAS FOUR DV11S; 
00,01,02,03 WILL BE SET IN LOC 'DVACTV 1 FROM THE 
REGISTER. USING THIS SWITCH(SWOO) ALTERS 

LOCATION; THEREFORE IF FOUR DV11S ARE IN THE SYSTEM ***DQ 
SET SWITCHS GREATER THAN SW 03 IN THE UP POSITION. THIS 



BE A FATAL ERROR. DO NOT SELECT 
GIVEN INFORMATION ABOUT IN TRIAL 
LOAD ADDRESS 200 
START WITH SW 00*1 
PROGRAM WILL TYPE MESSAGE 
SET THE BINARY NUMBER OF DV11S 
DV11; 3=2 DV1 1 ; 7=3 D V 1 1 ; 
CONTINUE. 

NUMBER (IF VALID) WILL BE IN DATA LIGHTS (EXCLUDING 11/05) 
SET WITH ANY OTHER SWITCH SETTINGS DESIRED. PRESS CONTINUE. 



BITS 
SWITCH 
THAT 
NOT*** 
WOULD 
BEEN 



MORE ACTIVE DV11S THAN HAS 
PROGRAM. 



DESIRED ACTIVE EXAMPLE: 1=1 
17=4 DV11 37=5 DV11 ETC. PRESS 



SW 01 RESTART PROGRAM AT SELECTED TEST IT IS STRONGLY SUGGESTED 

THAT AT LEAST ONE PASS HASS BEEN MADE BEFORE TRYING TO SELECT A 
TEST THAT IS NOT IN THE ORDER OF SEQUENCE THE REASON BEING IS 
THAT THE PROGRAM HAS TO CLEAR AREAS AND SET UP PARAMETERS. ALSO 
WHEN A TEST IS SELECTED ALWAYS START AT THE VERY BEGINNING OF 
THAT TEST. 

SW 09 LOOP ON CURRENT DATA: THIS SWITCH WILL ONLY WORK IF CALL 
1 SC0P1 ■ IS IN THAT TEST. THE REASON BEING THAT MOST TESTS DEAL 
WTTH BLOCKS OF DIFFERENT DATA TO BE SENT OR RECEIVED ALL AT ONCE 
THUS IN BLOCK DATA; ONE PATTERN CANN • T BE SINGLED OUT. 
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SEQ 0006 



4.1.3 SWITCH REGISTER PRIORITYS 
ERROR SWITCHES 



1. SW 12 DELETE PRINT OUT/BELL ON ERROR. 

2. SW 13 DELETE ERROR PRINTOUT. 

3. SW 15 HALT ON THE ERROR. 

4. SW 08 GOTO BEGINNING OF THE TEST ' ON ERROR). 

5. SW 10 GOTO NEXT TEST ( ON ERROR) . 

SCOPE SWITCHES 

1. SW 09 (IF ENABLED BY 1 SC0P1 » ) ON AN ERROR ; IF AN •*' IS PRINTED 



IN FRONT OF THE TEST NO. (EX. *TEST NO. 10 ) SW09 IS 
INCORPORATED IN THAT TIST AND THEREFORE SW09 IS ^USUALLY* THE 
BIST SWITCH FOP! THE SCOPg LOOP (SW14=0, SW10*0, SW09=1 , SW08=0) . 
IF SW09 IS NOT ENABELED; AND THERE IS A *HARD* ERROR 
' (CONSTANT); SW08 IS BEST. 

(SW14=1 t 0, SW10=0, SW09=0, SW08=1 ) . FOR INTERMI TTEMT 
ERRORS; SWT4=1 WILL LOOP ON TEST REGUARDLESS OF ERROR OR NOT 
ERROR. 

(SW14=1, SW'» 0=0 r SW09=0, SW08=1,0) 

2. SW 14 

3. SW 11 

4.2 STARTING ADDRESS 

STARTING ADDRESS IS AT 000200 THERE ARE NO OTHER STARTING ADDRESSES FOR 
THE DV11 DIAGNOSTICS PREVIOUSLY MENTIONED EXCEPT FOR DZDVE WHICH IS: 
000200 FOR THE MODEM CONTROL AND CABLE TESTS / ! D 000210 FOR THE MANUAL 
PARAMETER INPUT PROGRAM. 

NOTE: IF ADDRESS 000042 IS NON-ZERO THE PROGRAM ASSUMES IT IS UNDER 
ACT11 OR X;'DP CONTROL AND WILL ACT ACCORDINGLY AFTER *ALL* 
AVAILABLE DV11'S ARE TESTED THE PROGRAM WILL RETURN TO » XXDP 1 OR 
' ACT-1 1 ' . 

5. OPERATING PROCEDURE 

WHEN PROGRAM IS INITIALLY STARTED MESSAGES AS DESCRIBED IN SECTION FOUR 
WILL BE PRINTED. 

AND PROGRAM WILL BEGIN RUNNING THE DIAGNOSTIC 
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PROGRAM AND/OR OPERATOR ACTION . 

THE TYPICAL APPROACH SHOULD BE 

1. HALT ON ERROR (VIA SW 15=1) WHEN EVER AN ERROR OCCURS. 

2. CLEAR SW 15. 

3. SET SW 14: ( LOOP ON THIS TEST) 

4. SET SW 13: ( INHIBIT ERROR PRINT OUT) 

THE TEST NUMBER AND PC WILL BE TYPED OUT AND FCSSIBILY AN ERROR MESSAGE 
(THIS DEPENDS ON THE TEST) TO GIVE THE OPERATOR AN IDEA AS TO THE SOURCE 
OF THE PROBLEM. IF IT IS NECESSARY TO KNOW MORE INFORMATION CONCERNING 
im Hfe^iRf i LOOK IN THE LISTING F0R THAT tEST NUMBER WHICH WAS 

TYPED OUT AND THEN NOTg THI PS ?Hl IftftQ* *t£P§RT TNI § WAV fHI i*A§f 
FUNCTIONING OF THE TEST CAN BE INTERPEDITED. 



IF THE DATA "SET BUZ Y 11 JUMPER(S) ARE REMOVED FROM THE M7833 ASYNC LINE 
CARD, THE FOLLOWING PATCH SHOULD BE INSTALLED. 

CHANGE LOC 21524 F«QM 403 TO 240 

LOC 21532 FROM 34000 TO 7000 

THIS PATCH PUTS THE DV-11BB IN INTERNAL MAINTENANCE FOR THE PARTICULAR 
TEST. THIS WILL WORK WITH ALL ASYNC LINE CARDS; WILL NOT WORK WITH 
SYNC LINE CARDS. 

ERRORS 

AS DESCRIBED PREVIOUSLY THERE WILL ALWAYS BE A TEST NUMBER AND PC TYPED 
OUT AT THE TIME OF AN ERROR (PROVIDING SW 13=0 AND SW 12=0) . IN MOST 
CASES ADDITIONAL INFORMATION WILL BE SUPPLIED TO THE THE ERROR MESSAGE 
WHICH IS TO GIVE THE OPERATOR AN INDICATION OF THE ERROR. 

ERROR RECOVERY 

IF FOR SOME REASON THE DV1 1 SHOULD 'HANG THE BUS 1 (GAIN CONTROL OF BUS 
SO THAT CONSOLE MANUAL FUNCTIONS ARE INHIBITED) AN INIT OR POWER DOWN/UP 
IS NECESSARY FOR OPERATOR TO REGAIN CONTROL OF CPU. IF THIS SHOULD 
HAPPEN; LOOK IN LOCATION ^TSTNfr* (ADDRESS 1224)F0R THE NUMBER OF THE 
TEST THAT WAS RUNNING AT THE TIME OF THE CATASTROPHIC ERROR. IN THIS 
WAY THE OPERATOR WILL HAVE AN IDEA AS TO WHAT THE DV11 WAS DOING AT THE 
TIME OF THE ERROR. 

RESTRICTIONS 

STARTING RESTRICTIONS 

SEE SECTION 4. (PLEASE) 

STATUS TABLE SHOULD BE VERIFIED REGU>RDLESS OF HOW PROGRAM WAS STARTED. 
ALSO IT IS IMPORTANT TO USE THIS LISTING ALONG WITH THE INFORMATION 
PRINTED ON THE TTY TO COMPLETLY ISOLATE PROBLEMS. 
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SEQ 0008 



7.2 OPERATING RESTRICTIONS 

DV11 TRIAL PROGRAM MUST BE RUN PRIOR TO THE FIRST AND ONLY THE FIRST 
RUNNING OF ANY DIAGNOSTIC IF "AUTO SIZING" IS NOT USED. 

NOTE: IF NO PROGRAM OTHER THAN A DV1 1 DIAGNOSTIC WAS LOADED AFTER DV1 1 
TRIAL OR IF CORE MEMORY HAS NOT BEEN CHANGED ; OR IF THERE IS NO DV1 1 
CONFIGURATION CHANGES; THE DV11 TRIAL PROGRAM NEED NEVER BE RUN AGAIN. 
HOWEVER IF ANY OF THE ABOVE HAVE BEEN VIOLATED THE DV1 1 TRIAL PROGRAM 
MUST BE RUN AGAIN BEFORE RUNNING THE DIAGNOSTICS NOTE: AN ALTERNATIVE 
TO THE ABOVE IS ATTEMPTING THE 'AUTO SIZING' WHEN PROGRAM IS INITIALLY 
STARTED WITH SW07=0. 

7.3 HARDWARE CONFIGURATION RESTRICTIONS (SYNC LINE CARDS ONLY) 

1. HARDWARE MUST BE SET TO FULL DUPLEX 
2-. PARITY OFF. 

3. ALL LINES OF A PARTICULAR LINE CARD MUST BE CONFIGURED THE SAME. 
8. MISCELLANEOUS 

8.1 EXECUTION TIME 

ALL DV11 DEVICE DIAGNOSTICS WILL GIVE AN 'END PASS' MESSAGE (PROVIDING 
NO ERRORS AND SW12=0) WITHIN 4 MINS. THIS IS ASSUMING SW1 1*1 (DELETE 
ITERATIONS) IS SET TO GIVE THE FASTEST POSSIBLE EXECUTION. THE ACTUAL 
EXECUTION TIME DEPENDS GREATLY ON THE PDP11 CPU CONFIGURATION . 

8.2 PASS COMPLETE 

NOTE: *EVERY* TIME THE PROGRAM IS STARTED; THE TESTS WILL RUN AS IF 
SW11 (DE..ETE ITERATIONS) WAS UP (=1). THIS IS TO 'VERIFY NO *HARD* 
ERRORS' AS SOON AS POSSIBLE. THEREFORE THE FIRST PASS -EACH TIME 
PROGRAM IS STARTED- WILL BE A 'QUICK PASS' UNTILL ALL DV1 1 1 S IN SYSTEM 
ARE TESTED. WHEN THE DIAGNOSTIC HAS COMPLETED A PASS THE FOLLOWING IS 
AN EXAMPLE OF THE PRINT OUT TO BE EXPECTED. 

END PASS DZDVD-B CSR: 175000 VEC: 300 PASSES: 000001 ERRORS: 000000 

NOTE: THE NUMBERS FOR CSR AND VEC ARE NOT NECESSARILY THE VALUES FOR 
THE DEVICE. THEY ARE ONLY FOR THIS EXAMPLE. 

NOTE: DZDVE (MODEM AND CABLE TEST) END PASS MESSAGE IS A LARGE "END" 
TYPED OUT ON TTY. PLEASE NOTE THAT EACH CHARACTER PRINTED IS 
ACTUALLY AND "END PASS" INDICATION. THIS WAS USED IN PLACE OF 
"BELL" BECAUSE IF SW12=1 AND AN ERROR OCCURED THE BELL MAY BE 
MISTAKEN FOR END PASS. THE PASS EXECUTION IS SO FAST THAT THE 
STANDARD END PASS WAS TOO LENGHTLY. THEREFORE EACH CHAR IS AN 
"END PASS AND THE ENTIRE "END" IS NOT REQUIRED FOR ACCEPTANCE. 
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KEY LOCATIONS 



RETURN (1212) 



NEXT 

TSTNO 

RUN 



DVCROO 
DVSTOO- 
(1500) 



(1214) 
(1224) 
(1302) 



DVCR17 
DVST17 

(1736) 



DVACTV (1276) 



DVSCR (1356) 



LOO. 03 

L04.07 
L08.11 
L12.15 



(1412) 
(1414) 
(1416) 
(1420) 
BIT 15 
BIT 14 
BIT 13 
BIT 12 
BIT 11 
BIT 10 
BIT 09 
BIT 08 



CONTAINS THE ADDRESS WHERE PROGRAM WILL RETURN WHEN 
ITERATION COUNT IS REACHED OR IF LOOP ON TEST IS 
ASSERTED. 

CONTAINS THE ADDRESS OF THE NEXT TEST TO BE PEFORMED. 
CONTAINS THE NUMBER OF THE TEST NOW BEING PEFORMED. 
THE BIT IN 1 RUN 1 ALWAYS POINTS ONE PAST THE DV1 1 
CURRENTLY BEING TESTED. EXAMPLE: (RUN) 

1 302/0000000001 000000 MEANS THAT DV11 NO. 05 IS THE DV1 1 
NOW RUNNING. 



THESE LOCATIONS CONTAIN THE INFORMATION NET DED TO TEST 
UP TO 8 (DECIMAL) DV11S SEQUENTI ALY . THEY CONTAIN THE 
CSR,VECTOR AND STATUS CONCERNING THE CONFIGURATION OF 
EACH DV11 . 

EACH. BIT SET IN THIS LOCATION INDICATES 
ASSOCIATED DV11 WILL BE TESTED IN TURN. 
(DVACTV) 1 276/000000000001 1111 MEANS THAT 
00,01 ,02,03,04 WILL BE TESTED. EXAMPLE: 



THAT THE 
EXAMPLE: 
DV11 NO. 
(DVACTV) 

1276/0000000000010001 MEANS THAT DV11 NO. 00,04 WILL BE 
TESTED. 

CONTAINS THE RECEIVER CSR OF THE CURRENT DV1 1 UNDER 
TEST. 



CONTAINS THE STATUS OF THE CURRENT DV1 1 UNDER TEST. 
SET: 
SET: 
SET: 
SET: 
SET: 
SET: 

SET: 
SET: 
BIT09 


1 
1 

BIT 07-00 



LINE CARD *NOT INSTALLED (AND WONT BE TESTED) 
RESERVED 
RESERVED 

ONE SYNC, =0: TWO SYNCS. 
ASYNC LINE CARD, =0 SYNC LINE CARD. 
RESERVED 

BITS PER CHAR. (USED WITH BIT8) 
BITS PER CHAR. (USED WITH BIT9) 
BIT08 BITS PER CHAR. 
8 
7 
6 
5 

•A" FOR SPECIFIED LINE CARD. BITS 07-00 
BE ALL ZEROS FOR TESTING ASYNC LINE CARDS. 




1 

1 

SYNC 
MUST 



PAGE 10 



MORE ON THAT 'STATUS TABLE 1 (1500-1736) 
'MAP OF DV1 1 STATUS 1 



1500 


175000 


1502 


000300 


1504 


000226 


1506 


000062 


1510 


000226 


1512 


000062 


1514 


004000 


1516 


000000 


1520 


004000 


1S22 


000000 



'THE ABOVE INFORMATION WILL BE REPEATED FOR EACH OF UP TO 8 DV11 
SYSTEM( THESE WILL FOLLOW UNDER THIS TABLE) . EXPLANATION: 



S IN THE 



1500 

1502 
1504 



1 506 
1510 

1512 
1514 

1516 
1520 

1522 



175000 

000300 
000226 



BIT 15 
BIT 14 
BIT 13 
BIT 12 
BIT 11 
BIT 10 
BIT 09 
BIT 08 



BIT 07- 

000062 

000226 

00 0062 
000226 

0000f>2 
000226 

000062 



THIS IS THE SYSTEM CONTROL REGISTER FOR THE 1ST DV11 IN 
THE SYSTEM. 

THIS IS VECTOR 'A' FOR THE FIRST DV1 1 IN THE SYSTEM. 
THIS REPRESENTS 'SYNC A» AND THE SOFTWARE STATUS FOR THE 
1ST LIN- CARD IN THE 1ST DV11. THE BITS ARE AS FOLLOWS: 



SET: 
SET: 
SET: 
SET: 
SET: 
SET: 

SET: 
SET: 
BIT09 





1 

1 

00 
THIS 
THIS 
(FOR 
THIS 
THIS 
(FOR 
THIS 
THIS 
(FOR 
THIS 



LINE CARD *N0T INSTALLED (AND WONT BE TESTED) 

RESERVED 

RESERVED 

ONE SYNC, =0: TWO SYNCS. 

ASYNC LINE CARD, =0 SYNC LINE CARD. 

RESERVED 

BITS PER CHAR. (USED WITH BITS) 
BITS PER CHAR. (USED WITH BIT9) 
BIT08 BITS PER CHAR. 
8 





1 7 

6 

1 5 

SYNC 'A' FOR SPECIFIED LINE CARD. 
REPRESENTS 'SYNC B' FOR THE 1ST LINE CARD. 
IS 1 SYNC A' AND LINE STATUS FOR THE 2ND LINE CARD. 
BITS DEFINATION SEE EXPLANATION FOR LINE CARD . 1 ) .. 
IS 1 SYNC B 1 FOR' THE SECOND LINE CARD. 
IS 'SYNC A 1 AND LINE STATUS FOR THE 3RD LINE CARD. 
BITS DEFINATION SEE EXPLANATION FOR LINE CARD 1). 
IS 'SYNC B l FOR LINE CARD NO. 3. 

IS 'SYNC A» AND LINE STATUS FOR THE 4TH LINE CARD. 
BITS DEFINATION SEE EXPLANATION FOR LINE CARD 1). 
IS SYNC B FOR THE 4TH LINE CARD. 



THE ABOVE IS REPEATED FOR EACH DV11 IN THE SYSTEM. THE TABLE IS 
FILLED BY AUTO SIZING OR BY THE MANUAL PARAMETER INPUT PROGRAM 
AS DESCRIBED PREVIOUSLY. ALSO IF DESIRED BY USER; THE 
LOCATIONS MAY BE ALTERED BY HAND (TOGGLED IN) TO SUIT THE 
SPECIFIC CONFIGURATION. 
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SEO 0011 



8.5 *** METHOD OF AUTO SIZING *** 

8.5.1 FINDING THE CONTROL STATUS REGISTER* 

THE PROGRAM WILL START AT ADDRESS 175000 AND START * REFERENCE I NG 1 
ADDRESS. IF A NON-EX MEMORY TRAP OCCURES; THE POINTER (HOLDING 175000) 
IS UPDATED BY 10 AND THE ABOVE IS REPEATED UNTILL ADDRESS 175400 IS 
REACHED. IF A 1 SLAVE SYNC RESPONSE * WAS ISSUED BY THE DV1 1 (OR ANY 
OTHER DEVICE) (NO NXM TRAP) (AND IT (SELO) WAS=0) ; POINTER PLUS 12 
(SEL12) IS TESTED TO CONTAIN 177777 (MUST BE EXACTLY 177777) ; IF A TRAP 
IS ENCOUNTERED OR IF SEL12 DIES NOT CONTAIN 177777 THE ABOVE UPDATING IS 
PERFORMED. IF SEL12 WAS EQUAL TO 177777 THE POINTER IS STORED AWAY AND 
THE ROUTINE CONTINUES AS ABOVE: 

NOTE: IF THE PROGRAM DOES NOT FIND YOUR DV1 1 ; SOMETHING IS WRONG AND 
AUTO SIZING SHOULD NOT BE DONE. 

8.5.2 FINDING THE VECTOR 

THE VECTOR AREA (ADDRESS 300-776) IS FILLED WITH THE INSTRUCTION IOT AND 
* .+2' (NEXT ADDRESS) . BIT7 AND BIT6 (RX INTERUPT AND RX INTERUPT IE) 
ARE SET INTO DVSCR REGISTER; A DELAY IS MADE AND IF NO INTERUPT OCCURES 
( BECAUSE OF A BAD DV11 ) THE PROGRAM ASSUMES VECTOR ADDRESS 300 AND THE 
PROBLEM SHOULD BE FIXED IN THE DIAGNOSTIC. ONCE THE PROBLEM IS FIXED; 
THE PROGRAM SHOULD BE RE— SETUP AGAIN TO GET CORRECT VECTOR. IF AN 
INTERUPT OCCURED; THE ADDRESS TO WHICH THE DV1 1 INTERUPTED TO IS PICKED 
UP AND REPORTED AS THE VECTOR. . N?TE: IF THE VECTOR REPORTED IS NOT THE 
VECTOR SET UP BY YOU; THERE IS A PROBLEM AND AUTO SIZING SHOULD NOT BE 
DONE. 

8.5.3 PARAMETER ASSUMPTIONS. 

SINCE TOO MUCH HARDWARE WOULD NEED TO BE TURNED ON TO SIZE THE REST OF 
THE PARAMETERS; THE PROGRAM MUST ASSUME THE REMAINING VARIATIONS. THE 
RESULT IF NOT TO YOUR SPECIFIC CONFIGURATION MAY BE ALTERED BY HANG 
(TOGGLE IN) IS DESIRED. IN THIS WAY 95% OF THE PARAMETER JETUP WAS DONE 
BY THE PROGRAM AND 5% BY YOU. 
THEREFORE: 

1 ) ALL LINE CARDS (4) ARE ASSUMED TO BE INSTALLED. 

SET BIT15 OF STATUS MAP OF ANY (APPROIATE) LINE CARDS MISSING 

2) TWO SYNCS. 

SET BIT12 IF YOU HAVE A 4 LINE GROUP SET FOR 1 SYNC. 

3) EIGHT BITS PER CHAR. 

ADJUST BITS 9 AND BIT 8 IN STATUS MAP FOR YOUR CORRECT CONFIG. 

4) SYNCHRONOUS LINE CAR>S INSTALLED 

SET BIT11 OF STATUS MAP FOR ASYNC LINE CARD AND ZERO SYNC CHARS. 

5) SYNC "A"=226 AND SYNC "B» =062 

IN ALL ADJUSTMENTS PLEASE REFER TO SECTION 8.4A FC*R GRETER DETAIL. 
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SEQ 0012 



1 

2 ;*AC-8740C-MC/<377>/»CZDV,DC0 DV1 1 " ROM TST PRT2 

3 ;*COPYRIGHT 1972, DIGITAL ' EQUIPMENT CORP., MAYNARD, MASS . 01754 
5 

6 ;STARTING PROCEDURE 

7 ; LOAD PROGRAM 

8 ; LOAD ADDRESS 000200 

9 ; PRESS START 

10 ; PROGRAM WILL TYPE " AC-8740C-MC/<377>/" CZDVDCO DV11" ROM TST PRT2" 

11 ; PROGRAM WILL TYPE "R" TO INDICATE THAT TESTING HAS STARTED 

12 ; AT THE END OF A PASS, PROGRAM WILL TYPE PASS COMPLETE MESSAGE 

13 ; AND THEN RESUME TESTING 

14 ' * 

15 • 

16 {SWITCH REGISTER OPTIONS 

17 , 

18 

19 100000 SW15=100000 ;=1,HALT ON ERROR 

20 040000 SW14=40000 ;=1,L00P ON CURRENT TEST 

21 020000 SW13=20000 {=1, INHIBIT ERROR TYPEOUT 

22 010000 SW12=10000 {=1, DELETE TYPEOUT/BELL ON ERROR. 

23 004000 SW1 1=4000 ' ;*1 , INHIBIT ITERATIONS 

24 002000 SW10=2000 ;=1, ESCAPE TO NEXT TEST ON ERROR 

25 001000 SW09=1000 ;*1,L0OP WITH CURRENT DATA 

26 000400 SW08=400 ;xl,LOOP ON ERROR 

27 00Q200 SW07=200 ;=1, DO "AUTO SIZING" ON INITAL START UP. 

28 000100 SW06=100 

29 000040 SW05=40 

30 000020 SW04=20 ; 

31 000010 SW03=10 

' 32 000004 SW02=4 ; LOCK ON TEST SELECT 

33 000002 SW01=2 {RESTART PROGRAM AT SELECTEB TEST 

34 000001 SW00-1 ; RES ELECT DV1 1 DESIRED ACTIVE 

35 {NOTE: THIS MUST NOT EXCEED ORIGINAL COUNT 



CZDVDCO MACY11 30A(1052) 10-FEB-78 



CZDVDC. P11 


02-FEB-78 


36 




37 




38 




39 




40 




41 


000000 


42 


000001 


43 


000002 


44 


000003 


45 


000004 


46 


000005 


47 


000006 


48 


00 0007 


49 




50 




51 




52 




53 


177776 


54 


001200 


55 




56 


100000 


57 


040000 


58 


020000 


59 


01 0000 


60 


004000 


61 


002000 


62 


001000 


63 


000400 


64 


000200 


65 


000100 


66 


000040 


67 


000020 


68 


000010 


69 


000004 


70 


000002 


71 


000001 


72 




73 


01 0000 


74 


020000 


75 


030000 


76 


040000 


77 


050000 


78 


060000 


79 


070000 


80 




81 




82 





15:44 PAGE 3 

GENERAL . DEF I NATIONS AND EQUIVALENCIES 



; REGISTER DEFINITIONS 



SEQ 0013 



R0=%0 
R1 =%1 
R2=%2 
R3=%3 
R4=%4 
R5=%5 
SP=%6 
PC=%7 



; GENERAL REGISTER 
; GENERAL REGISTER. 
{GENERAL REGISTER 
{GENERAL REGISTER 
{GENERAL REGISTER 
; GENERAL REGISTER 
; PROCESSOR STACK POINTER 
{ PROGRAM COUNTER 



{LOCATION EQUIVALENCIES 



PS=177776 
STACK*1200 

BIT1 5*100000 

BIT1 4=40000 

BIT1 3=20000 

BIT12=10000 

BIT1 1=4000 

BIT10=2000" 

BIT9M000 

BIT8=400 

BIT7=200 

BIT6=100 

BIT5=40 

BIT4=20 

BIT3=10 

BIT2=4 

BIT1=2 

BIT0=1 



J PROCESSOR STATUS WORD 
; START OF PROCESSOR STACK 



ALU=BIT12 
RAM=BIT1 3 

XFR = BIT13+B.IT12 • • 
■NPR=BIT14 
S.C=BIT14+BIT12 
BCC=BIT14+BIT13 
BRB=BIT14+BIT13+BIT12 
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SEQ 0014 



83 
84 
85 
86 
87 
88 
89 
90 



:********************************^ 

;TRAPCATCAER FOR ILLEGAL INTERRUPTS 
; THE STANDARD "TRAP CATCHER" IS PLACED 
; BETWEEN ADDRESS TO ADDRESS 776. 
;IT LOOKS LIKE "PC+2 HALT". 



92 
93 
94 
95 
96 
97 
98 
99 
100 
101 
102 
103 
104 
105 
106 
107 
108 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 
119 
(2) 
120 
121 
122 
123 
124 
125 
126 
127 
128 
129 
130 
131 
132 
133 
134 
135 
136 
137 



{STANDARD INTERRUPT VECTORS 



000024 
000026 
000030 
000032 
000034 
000036 

000040 
000042 
000044 
000046 



000174 
000176 



000024 

004402 

000340 

004002 

000340 - 

003750 

000340 

000040 

000001 

000001 

0000U 

002560 

000174 
000000 
000176 
000000 

000200 

000137 001742 



001000 

005377 041501 



.■174 

LIGHT! 
.•176 
SSWR: 

.«200 



.■1000 
034055 MTITLE: 



. PFAIL 
340 
.HLT 
340 

.TRPSRV 
340 

. BLKW 1 
. BLKW 1 
. BLKW 1 
LOGICAL 



001200 
001200 
001202 



001204 
001206 
001210 
001212 



177570 
177570 



177560 
177562 
177564 
177566 



001214 000000 
001216 000000 
001220 000000 



.■1200 

LIGHTS: 



TKCSR: 
tkdbr: 
Tpcsr: 
TPDBR: 



return: 

NEXT: 

LOCK: 



{POWER FAIL HANDLER 

; SERVICE AT LEVEL 7 

{ ERROR HANDLER 

{SERVICE AT LEVEL 7 

; GENERAL HANDLER DISPATCH SERVICE 

; SERVICE AT LEVEL 7 

5 SAVE FOR ACT-11 OR DDP2 

} RETURN ADPRESS IF UNDER ACT-11 OR DDP2 

; SAVE FOR ACT-11 OR DDP2 

J FOR USE WITH ACT-11 OR DDP2 



{GO TO START OF PROGRAM 



. ASCIZ <377><1 2>/AC-074OC-MC/<377>/" CZDVDCO DV11" ROM TST PRT2/<377> 



177570 
177570 

5 INDIRECT POINTERS TO TELETYPE VECTORS AND REGISTERS 



177560 
177562 
177564 
177566 



{ TELETYPE KEYBOARD CONTROL REGISTER 
{TELETYPE KEYBOARD DATA BUFFER * 
{TELEPRINTER CONTROL REGISTER 
; TELEPRINTER DATA BUFFER 



; PROGRAM CONTROL PARAMETERS 



{SCOPE ADDRESS FOR LOOP ON TEST 
{ADDRESS OF NEXT TEST TO BE EXECUTED 
{ADDRESS FOR LOCK ON CURRENT DATA 



CZDVDCO 


MACY1 1 


30AM052) 10-FEB-78 
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CZDVDC. 


P11 02-FEB-78 13:55 


PROGRAM 


PARAMETERS, VARIABLES , 


AND TRAP CALLS. 


138 


001222 


000003 


ICOUNT: 


3 


; NUMBER OF ITERATIONS THAT CURRENT 


139 


001224 


. 000000 


LPCNT: 





; NUMBER . OF ITEREATIONS COMPLETED 


140 


001226 


000000 


TST NO: 





; NUMBER OF TEST IN PROGRESS 


141 


001230 


00001/0. 


PASCNT: 





{ NUMBER OF PASSES COMPLETED 


142 


001232 


000000 


ERRCNT: 





{TOTAL NUMBER OF ERRORS 


143 
144 
145 


001234 


000000 


LSTERR: 





•PC OF LAST ERROR CALL 








{PROGRAM VARIABLES 




146 
147 
148 












001236 


o*.oooo 


STAT:. ;': 





{DV STATUS WORD STORAGE 


149 


001240 


000000 


SYNCX: , 







150 


001242 


000000 


CLKX: ' 







151 


001244 


000000 


MASKX: 







152 


001246 


000000 


TEMPI : 





{ TEMPORARY STORAGE 


153 


001250 


000000 


TEMP21 





{TEMPORARY STORAGE 


154 


001252 


000000 


TEMP3 5 





{ TEMPORARY STORAGE 


155 


001254 


' 000000 


TEMP4: 





J TEMPORARY STORAGE 


156 


001256 


000000 


TEMPS: 





j TEMPORARY STORAGE 


157 


001260 


000000 


SAVROS 





{RO STORAGE 


1.SS 


001262 


000000 


SAVR1 : 





;R1 STORAGE 


159 


001264 


000000 


SAVR2: 





{R2 STORAGE 


160 


001266 


000000 


SAVR3: 





;R3 STORAGE 


161 


001270 


000000 


SAVR4 J 


V 


{R4 STORAGE 


162 


001272 


000000 


SAVR5: 





; R5 STORAGE 


163 


001274 


000000 


SAVSP: 





{STACK POINTER STORAGE 


164 


001276 


oopooo 


SAVPC: 





{PROGRAM COUNTER STORAGE 


165 


001300 


000001 


DVACTV: 


. BLKB J 


{DV11 »S SELECTED ACTIVE. 


166 


001301 


000001 


DVNUM: 


.BLK3 1 


{OCTAL NUMBER OF DV11 'S. 


167 


001302 


000001 


SAVACT: 


.BLKB 1 


{ORIGINAL ACTV. DEVICES. 


168 


001303 


000001 


Savnum: 


.BLKB 1 


{ WORKABLE NUMBER. 


169 


001304 


000001 


run: 


.BLKB, 1 


{ POINTER ONE PAST RUNNING DEVICE. 


170 




001306 


. EVEN 






171 


001306 


001500 


CREAM: 


DV.MAP 


{TABLE POINTER. 
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CZDVDC . P1 1 '02-FEB-78 13:55 PROGRAM PARAMETERS , VARIABLES , AND TRAP CALLS. 

172 

173 ; PROGRAM CONTROL FLAGS 

174 ; ' 

176 001310 000 INIFLG: .BYTE ; PROGRAM INITIALIZATION FLAG 

177 001311 000 ERRFL.G: . BYTE ; ERROR OCCURED FLAG 

178 001312 000 LOKFLG: , BYTE { LOCK ON CURRENT TEST FLAG 
' 179 001313 000 QV.FLG: .BYTE ;QUICK VERIFY FLAG. 

180 ;0N FIRST PASS OF EACH DV1 1 ITERATIONS WILL BE SUPPRESSE 

181 . EVEN 

182 000000 $Y*0 
183 

1S 4 {DEFINITIONS FOR TRAP SUBROUTINE CALLS 

185 {POINTERS TO SUBROUTINES CAN BE FOUND 

186 . 5lN THE TABLE IMMEDIATLY FOLLOWING THg DEFINITIONS 
187 

189 . ; * ~~ 

190 001314 .TRPTAB: 

191 104400 SCOPE«TRAP+0 {CALL TO SCOPE LOOP AND ITERATION HANDLER 

192 001314 002634 . SCOPE ' 

193 104401 SC0P1=TRAP+1 {CALL TO LOOP ON CURRENT DATA HANDLER 

194 001316 003020 . SCOP1 

195 104402 TYPE*TRAP+2 {CALL TO TELETYPE. OUTPUT ROUTINE 

196 001320 003044 .TYPE 

197 104403 lNSTR*TRAP+3 ; CALL TO ASCII STRING INPUT ROUTINE 

198 001322 003120 . INSTR 

199 104404 INSTER=TRAP+4 {CALL TO INPUT ERROR HANDLER 

200 001324 003224 . INSTER 

201 104405 PARAM=TRAP+5 ; CA L L TO NUMERICAL DATA INPUT ROUTINE 

202 001326 003244 . PARAM 

203 104406 SAV05=TRAP+6 {CALL TO REGISTER SAVE ROUTINE 
204' 001330 003444 . SAV05 

205 104407 RES05*TRAP+7 {CALL TO REGISTER RESTORE ROUTINE 

206 001332 003504 . RES05 

207 104410 CONVRT=TRAPf 10 {CALL TO DATA OUTPUT ROUTINE 

208 001334 003536 .CONVRT 

209 104411 CNVRT=TRAP+11 {CALL TO DATA OUTPUT ROUNTINE WITHOUT CR/LF. 

210 001336 003542 . CNVRT 

211 104412 MSTCLRsTRAP+12 {CALL TO I.SUE A MASTER CLEAR 

212 001340 004556 . MSTCLR 

213 104413 RAMCLR = TRAP+1 3 {CALL TO CLEAR THE RAMS 

214 001342 004516 . RAMCLR 

215 1044; 4 DELAY=TRAP+1 4 {CALL TO VARIABLE DELAY COUNTER 

216 001344 004476 .DELAY 

217 104415 R0MCLK*TRAP+15 {CALL TO CLOCK ROM ONCE 

218 001346 004566 . ROMCLK 

219 104416 DAT ACLK=TRAP+1 6 {CALL TO CLK DATA 

220 001350 004576 . DATACLK 
221 

222 { 

223 ; :******************************************************************** 
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224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
250 
251 
252 
253 
254 
255 
256 
257 
258 
259 
260 
261 
262 
263 
264 
265 
266 
267 
268 
269 
270 
271 
272 
273 
274 
275 



15:44 PAGE 7 

PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 



{DV11 VECTOR AND REGISTER INDIRECT POINTERS 



SEQ 0017 



001352 
001354 
001356 
001360 
001362 
001364 
001366 
001370 
001372 
001374 
001376 
001400 
001402 
001404 



001406 
001407 
001410 
001411 

001412 
001413 
001414 
001415 

001416 
001420 
001422 
001424 

001426 
001430 
001432 
001434 



000000 
000000 
000000 
000000 
000000 
000000 

000000 

000000 
000000 
000000 
000000 
000000 
000000 
000000 



000 
000 
000 
000 

010 
010 
010 
010 

000000 

000000 

000000 

000000 

000000 

000000 
000000 
000000 



DVRVEC: 





{ POINTER 


TO 


DVRLVL: 





; POINTER 


TO 


DVTVEC: 





; POINTER 


TO 


dvtlvl: 





{POINTER 


TO 


DVSCR: 





; POINTER 


TO 


dvscrh: 





{POINTER 


TO 


DVRIC: 





; POINTER 


TO 


DVLCR : 





; POINTER 


TO 


DVSRS: 





; POINTER 


TO 


OVSRSH: 





{POINTER 


TO 


DVSRA: 





; POINTER 


TO 


DVSFR: 





; POINTER 


TO 


DVNSR: 





; POINTER 


TO 


RESV16: 





{POINTER 


TO 



NEXT RECEIVED CHARACTER REGISTER 



{DV11 CONTROL INDICATORS FOR CURRENT DV11 UNDER TEST 



MASK. A: 
MASK . B: 
MASK.C: 
MASK.D*. 

CLK. A 
CLK.B 
CLK.C 
CLK.D 

LOO. 03: 
L04.07: 
L08. 1 1 : 
L12.15: 



.BYTE 000 
.BYTE 000 
.BYTE 000 
.BYTE 000 

.BYTE 8. 
. BYTE 8. 
.BYTE B. 
.BYTE 8. 

000000 
000000 
000000 
000000 



SYNC2A : 000000 

SYNC2B: 000000 

SYNC2C: 000000 

SYNC2D: 000000 



{LAST CHAR TO TEST AND PARITY MASK FOR LINES 00-03 

{LAST CHAR TO TEST AND PARITY MASK FOR LINES 04-07 

{LAST CHAR TO TEST AND PARITY MASK FOR LINES 08-11 

{LAST CHAR TO TEST AND PARITY MASK FOR LINES 12-15 

{ NUMBER OF CLOCKS NEEDED FOR ONE CHAR FOR LINES 00-03 

{NUMBER OF CLOCKS NEEDED FOR ONE CHAR FOR LINES 04-07 

{NUMBER OF CLOCKS NEEDED FOR ONE CHAR FOR LINES 08-11 

{NUMBER OF CLOCKS NEEDED FOR ONE CHAR FOR LINES 12-15 

{PARAMETERS FOR LINES 00-03 

{PARAMETERS FOR LINES 04-07 

{ PARAMETERS FOR LINES 08-11 

{ PARAMETERS FOR LINES 12-15 

{SYNC 2 



'.SUMMARY 



040 


5 


BITS 


PER 


CHAR . 


100 


6 


BITS 


PER 


CHAR. 


200 


7 


BITS 


PER 


CHAR. 


000 


8 


BITS 


PER 


CHAR. 


005 


5 


BITS 


PER 


CHAR . 


006 


6 


BITS 


PER 


CHAR. 


007 


7 


BITS 


PER 


CHAR. 


010 


8 


BITS 


PER 


CHAR. 
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276 






277 






278 






279 




001500 


280 


001500 




281 


001500 


000001 


282 


001502 


000001 


283 


001504 


000001 


284 


001506 


000001 


28S, 


001510 


000001 


286 


001512 


0*0001 


287 


001514 


000001 


288 


001316 


000001 


289 


001520 


000001 


290 


001522 


000001 


291 






292 


001524 


000001 


293 


001526 ' 


000001 


294 


001 530 


000001 


295 


001 532 


000001 


296 


001 534 


000001 


297 


001 536 


000001 


298 


001 540 


000001 


299 


001 542 


000001 


300 


001544 


000001 


301 


001546 


000001 


302 






303 


001 550 


000001 


304 


001 552 


000001 


305 


001 554 


000001 


306 


001 556 


000001 


307 


001560 


000001 


308 


001 562 


000001 


309 


001 564 


000001 


31 


001 566 


000001 


31 1 


001570 


000001 


312 


001572 


000001 


31 3 






314 


001 574 


000001 


315 


001576 


000001 


316 


001 600 


000001 


31 7 


001 602 


000001 


318 


001 604 


000001 


319 


001 606 


000001 


320, 


001610 


000001 


321 


001 61 2 


000001 


322 




A A A A A i 


323 


001616 


000001 


324 






325 


001620 


000001 


326 


001622 


000001 


327 


001624 


000001 


328 


001626 


000001 


329 


001630 


000001 


330 


001632 


000001 


331 


001634 


000001 
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PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS* 

;DV11 STATUS TABLE AND ADDRESS ASSIGNMENTS 



SEO 0018 



.«1500 
DV.MAP 
DVCROO 
DVTROO 
DVOO.A 
SYNAOO 
DVOO.B 
SYNBOO 
DVOO.C 
SYNCOO 
bV0O*D 
SYNDOO 

DVCR01 
DVTR01 
DV01 . A 
SYNA01 
DV01 . B 
SYNB01 
DV01..C 
SYNC01 
DV01 .D 
SYND01 

DVCR02 
DVTR02 
DV02,A: 
SYNA02: 
DV02.B: 
SYNB02: 
DV02.C 
SYNC02; 
DV02.D: 
SYND02: 

DVCR03 
DVTR03 
DV03.A 
SYNA03 
DV03.B 
SYNB03 
DV03.C 
SYNC03 
DV03.D 
SYND03 

DVCR04 
DVTR04 
DV04 . A 
SYNA04 
DV04.B 
SYNB04 
DV04.C 



. BLKW 1 

. BLKW 1 

.BLKW 1 

.BLKW 1 

. BLKW 1 

. BLKW 1 

.BLKW 1 

.BLKW 1 

.BLKW 1 

. BLKW 1 

.BLKW 1 

.BLKW 1 

.BLKW 1 

.BLKW 1 

.BLKW 1 

.BLKW 1 

.BLKW 1 

.BLKW 1 

.BLKW 1 

. BLKW 1 

.BLKW 1 

.BLKW 1 

. BLKW 1 



.BLKW 

.BLKW 1 

.BLKW 1 

.BLKW 1 

. BLKW 1 

. BLKW 1 

. BLKW 1 



.BLKW 1 

. BLKW 1 

. BLKW 1 

. BLKW 1 

.BLKW 1 

. BLKW 1 

. BLKW 1 

.BLKW 1 

. BLKW 1 

.BLKW 1 

.BLKW 1 

. BLKW 1 

. BLKW 1 

.BLKW 1 

. BLKW 1 

.BLKW 1 

.BLKW 1 



{CONTROL STATUS REGISTER FOR DV11 NUMBER 00 
{VECTOR "A" FOR DV11 NUMBER 00 
; PARAMETER FOR LINES 00-03 FOR 0V11 NUMBER 00 
; SYNC TWO 

; PARAMETER FOR LINES 04-07 FOR 0V11 NUMBER 00 
; SYNC TWO . 

; PARAMETER FOR LINES 08-11 FOR DV11 NUMBER 00 
{SYNC TWO 

{PARAMETER FOR LINES 12*15 FOR QV11 NUMBER 00 
ISVNG TWO 

{CONTROL STATUS REGISTER FOR DV11 NUMBER 01 
VECTOR "A" FOR DV11 NUMBER 01 
PARAMETER FOR LINES 00-03 FOR DV11 NUMBER 01 
SYNC TWO 

PARAMETER FOR LINES 04-07 FOR DV11 NUMBER 01 
SYNC TWO 

PARAMETER FOR LINES 08-11 FOR DV11 NUMBER 01 
SYNC TWO • 

PARAMETER FOR LINES 12-15 FOR DV11 NUMBER 01 
SYNC TWO 

CONTROL STATUS REGISTER FOR DV11 NUMBER 02 
VECTOR "A" FOR DV11 NUMBER 02 
PARAMETER FOR LINES 00-03 FOR DV11 NUMBER 02 
SYNC TWO 

PARAMETER FOR LINES 04-07 FOR 0V11 NUMBER 02 
SYNC TWO 

PARAMETER FOR LINES 08-11 FOR DV11 NUMBER 02 
SYNC TWO 

PARAMETER FOR LINES 12-15 FOR DV11 NUMBER 02 
SYNC TWO 

CONTROL STATUS REGISTER FOR DV11 NUMBER 03 
VECTOR "A" FOR DV11 NUMBER 03 
PARAMETER FOR LINES 00-03 FOR 0V11 NUMBER 03 
SYNC TWO 

PARAMETER FOR LINES 04-07 FOR DV11 NUMBER 03 
SYNC TWO 

PARAMETER FOR LINES 08-11 FOR DV11 NUMBER 03 
SYNC TWO 

PARAMETER FOR LINES 12-15 FOR DV11 NUMBER 03 
SYNC TWO 

CONTROL STATUS REGISTER FOR DV11 NUMBER 04 
VECTOR "A" FOR DV11 NUMBER 04 
PARAMETER FOR LINES 00-03 FOR DV11 NUMBER 04 
SYNC TWO 

PARAMETER FOR LINES 04-07 FOR DV11 NUMBER 04 
SYNC TWO 

PARAMETER FOR LINES 08-11 FOR DV11 NUMBER 04 
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332 


001636 


000001 


SYNC04: 


. BLKW 


1 


333 


001640 


000001 


DV04.D5 


.BLKW 


1 


334 


001642 


000001 


SYND04! 


. BLKW 


1 


335 












336 


001644 


000001 


DVCR05: 


. BLKW 


1 


337 


001646 


000001 


DVTR05! 


.BLKW 


1 


338 


001650 


000001 


DV05.A: 


.BLKW 


1 


339 


001652 


000001 


SYNA05! 


. BLKW 


1 


340 


001654 


000001 


DV05.B: 


. BLKW 


1 


341 


001656 


000001 


SYNB05: 


. BLKW 


t 


342 


001660 


000001 


DV05.C: 


. BLKW 


1 


343 


001662 


000001 , 


. ■ SYNC05: 


• BLKW 


1 


344 


001684 


000001 


DV05.D*. 


. BLKW 


1 


348 


001681 


600001 


SYNOOBt 


• BLKW 


1 


346 












347 


001670 


000001 


DVCROO: 


, BLKW 


1 


348 


001672 


000001 


DVTR06: 


.BLKW 


1 


349 


001674 


000001 


DV06.A: 


.BLKW 


1 


350 


001676 


000001 


SYNA06! 


. BLKW 


1 


351 


001700 


000001 


DV06.B! 


.BLKW 


1 


352 


001702 


000001 


SYNBOS: 


.BLKW 


1 


353 


001704 


000001 


DV06.C: 


. BLKW 


1 


354 


001706 


000001 


SYNC06: 


. BLKW 


1 


355 


001710 


000001 


DV06.D: 


.BLKW 


1 


358 


001712 


000001 


SYND06 : 


. BLKW 


1 


357 












353 


001714 


000001 


DVCR07: 


. BLKW 


1 


359 


001716 


000001 


DVTR07: 


. BLKW 


1 


360 


001720 


000001 


, DV07.AJ 


.BLKW 


1 


361 


001722 


000001 


SYNA07 ! 


, BLKW 


1 


332 


001724 


000001 


DV07.B: 


. BLKW 


1 


363 


001726 


000001 


SYNB07 : 


. BLKW 


1 


'364' 


001730 


000001 


DV07.CS 


, BLKW 


1 


365 


001732 


000001 


SYNC07: 


. BLKW 


1 


'368 


001734 


000001 


DV07.D: 


.BLKW 


1 


387 


001736 


000001 


SYND07S 


. BLKW 


1 


368 












369 


001740 


000000 


DV.END: 


000000/ 



SEO 0019 

VARIABLES, AND TRAP CALLS. 
{SYNC TWO 

; PARAMETER FOR LINES 12-15 FOR DV11 NUMBER 04 
{SYNC TWO 

{CONTROL STATUS REGISTER FOR DV11 NUMBER 05 
{VECTOR "A" FOR DV11 NUMBER 05 
{ PARAMETER FOR LINES 00-03 FOR DV11 NUMBER 05 
{SYNC TWO 

{PARAMETER FOR LINES 04-07 FOR DV11 NUMBER 05 
{SYNC TWO 

{PARAMETER FOR LINES 08-11 FOR DV11 NUMBER 05 
(SYNC fWO 

{PARAMETER FOR LINES 12-15 FOR 0V11 NUMBER 05 
l»YN6 TWO 

{CONTROL STATUS REGISTER FOR 0V11 NUMBER 05 
{VECTOR "A" FOR DV11 NUMBER 06 
; PARAMETER FOR LINES 00-03 FOR DV11 NUMBER 06 
{ SYNC TWO 

; PARAMETER FOR LINES 04-07 FOR DV11 NUMBER 06 
{SYNC TWO 

} PARAMETER FOR LINES 08-11 FOR DV11 NUMBER 06 
{SYNC TWO 

{PARAMETER FOR LINES 12-15 FOR DV11 NUMBER 06 
{SYNC TWO 

{CONTROL STATUS REGISTER FOR DV11 NUMBER 07 
{VECTOR "A" FOR DV11 NUMBER 07 
{ PARAMETER FOR LINES 00-03 FOR DV11 NUMBER 07 
{SYNC TWO 

; PARAMETER FOR LINES 04-07 FOR DV11 NUMBER 07 

{SYNC TWO 

{ PARAMETER FOR LINES 08-11, FOR DV11. NUMBER 07 , 
{SYNC TWO 

{ PARAMETER FOR LINES 12-15 FOR DV11 NUMBER 07 
{SYNC TWO 
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CZDVDC.P11 -02-FEB-78 13:55 PROGRAM INITIALIZATION AND START UP. 



SEQ 0020 



3 71 ; PROGRAM INITIALIZATION 

372 ;LOCK OUT INTERRUPTS 

373 ;SET UP PROCESSOR STACK 

374 ;SET UP POWER FAIL VECTOR 

375 ; CLEAR PROGRAM CONTROL FLAGS AND COUNTS 

376 ; TYPE TITLE MESSAGE 



J/ / 
378 


001742 


01 2737 


000340 


177776 


.START : 


MOV 


#340 , PS 


1 r\C*U HI 1 T TklTCDDIIQTC 

LUCK UUT INTfcRRUPTb 


379 


001750 


01 2706 


001 200 






MOV 


#STACK,SP 


ScT UP bTALK 


380 


001754 


01 2737 


004402 


000024 




MOV 


# . PFAI L i d*#24 


CCT IID OniitCTD CAT! \/C/*TflD 

bfc l Ur PUWtR rAlw VbulUK 


381 


001762 


1 1 3737 


001301 


001303 




MOVB 


DVNUM , SAVNUM 


5AVE NUMBpR ur UtVlUtb IN biblcM. 


382 


001770 


005037 


001230 






CLR 


PASCNT 


ULfcAK rAbb CUUN 1 


383 


001774 


105037 


00131 1 






CLRB 


ERRFLG 


CLEAR ERROR FLAG 


384 


002000 


105037 


001 313 






CLRB 


QV.FLG 


ZERO QUICK VERIFY FLAG 


385 


002004 


01 2737 


001500 


001306 




MOV 


#DV .MAP , CREAM 


GET MAP POINTER. 


386 


002012 


1 1 2737 


000001 


001304 




MOVB 


#1 ,RUN 


POINT POINTER TU PlRbT UtVXLt. 


387 


002020 


005037 


001232 






CLR 


ERRCNT 


CLEAR ERROR COUNT 


388 


002024 


005037 


001234 






CLR 


LSTERR 


CLEAR LAST ERROR POINTER 


389 


002030 


01 2737 


000001 


001 226 




MOV 


#1 , TSTNQ 


SET UP FOR TEST 1 


390 


002036 


01 2737 


001 742 


001214 




MOV 


#. START t RETURN 


bcT UP FOR PCJWeR PAIL DCrURc 


391 
















TESTING STARTS 


392 


002044 


105737 


001310 






TSTB 


INIFLG 


HAS INITIALIZATION BEEN PERFORMED 


393 


002050 


001 063 








BNE 


1$ 


BR IF YES 


394 


002052 


01 3746 


000004 






MOV 


4,-(SP) 




395 


002056 


01 3746 


000006 






MOV 


6,-(SP) 




396 


002062 


005037 


000006 






CLR 


6 




397 


002066 


01 2737 


002104 


000004 




MOV 


#80$, 4 




398 


002074 


005777 


1771 02 






TST 


@»SWR 




399 


0021 00 


000240 








NOP 


■ 




400 


002102 


0: 0407 








BR 


81 $ 




401 


0021 04 


022626 






80$ : 


CMP 


(SP)+, (SP)+ 




402 


0021 06 


01 2737 


000174 


001200 




MOV 


#LIGHT , LIGHTS 




403 


0021 14 


01 2737 


000176 


001 202 




MOV 


#SSWR,SWR 




404 


0021 22 


01 2637 


000006 




81 $: 


MOV 


(SP)+ t 6 




405 


002126 


01 2637 


000004 






MOV 


(SP)+,4 




406 


0021 32 


104402 


001 000 






TYPE 


,MTITLE 


TYPE TITLE MESSAGE 


407 


0021 36 


105137 


001310 






COMB 


INIFLG 


IF NOT SET FLAG AND DO 


408 


0021 42 














BI T7= 1 


409 


002146 


100402 








BMI 


16$ 


BR IF NO AUTO SIZE 


410 


002150 


004737 


006624 






JSR 


PC.CSRMAP 


GO DO THE AUTO SIZE 


41 1 


002154 


104402 


005461 




16$: 


TYPE 


, XHEAD J TYPE HE/ 


\DER 


412 


002160 


01 2737 


001500 


001246 




MOV 


#DV. MAP, TEMPI 


SET POINTER 


413 


002166 


01 7737 


177054 


001250 


5$: 


MOV 


©TEMPI ,TEMP2 


SET DATA 


414 


002174 


022737 


177777 


001250 




CMP 


#177777, TEMP2 


ALL DONE? 


415 


002202 


001406 








BEQ 


1$ 


BR IF YES 


416 


002204 


104410 








CONVRT 






417 


002206 


005506 








X5TATQ 






418 


002210 


062737 


000002 


001246 




ADD 


#2, TEMPI 


UPDATE POINTER 


419 


002216 


000763 








BR 


5$ 




420 


002220 


005737 


000042 




1$: 


TST 


@#42 


IS PROGRAM RUNNING UNDER MONITOR 


421 


002224 


001030 








BNE 


3$ 


BR IF YES 


422 


002226 


032777 


000001 


176746 




BIT 


#SW00,@SWR 


SELECT SPECIFIC DEVICES?? 


423 


002234 


001424 








BEQ 


3$ 


BR IF NO. 


424 


002236 


104402 


005402 






TYPE 


,MNEW 


TYPE THE MESSAGE * 


425 


002242 


005000 








CLR 


RO 


ZERO DATA LIGHTS 
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SEQ 0021 



CZDVDC. 


Pt 1 02-FEB-78 


13:55 




PROGRAM 


INITIALIZATION AND START UP. 






426 


002244 


000000 








HALT 




;WAIT FOR USER TO TELL WHAT DEVICES TO 


RUN 


427 


002246 


127737 


1 76730 


001302 




CMPB 


@SWR,SAVACT 


; IS THE NUMBER VALID? 




428 


002254 


101404 








BLOS 


2$ 


; BR IF NUMBER IS OK. 




429 


002256 


104402 


005243 






TYPE 


, MERR3 


; TELL USER OF INVALID NUMBER. 




430 


002262 


000000 








HALT 




;STOP EVERY THING.- 




431 


002264 


000776 








BR 


.-2 


; RESTART THE PROGRtKl AGAIN. 




432 


002266 


1 1 7737 


176710 


001300 


2$: 


MOVB 


@SWR,DVACTV 


; GET NEW DEVICE PATTERN 




433 


002274 


1 1 3700 


001300 






MCVB 


DVACTV.RO 


;SHOW THE USER WHAT HE SELECTED. 




434 


002300 


042700 


177400 






BIC 


#~C<377>,R0 


;USE ONLY LOW BYTE. 




435 


002304 


000000 








HALT 




;C0NTINUE DYNAMIC SWITCHES. 




436 


002306 


• 2700 


000300 




3$: 


MOV 


#300, RO 


; PREPARE TO CLEAR THE FLOATING 




437 


002312 


01 2701 


000302 






MOV 


#302, R1 


;VECTOR AREA. 300-776 




438 


002316 


01 0120 






4$: 


MOV 


R1 ,(R0)+ 


; START PUTTING "PC+2 - HALT". 




439 


002320 


005021 








CLR 


(RD + 


JIN VECTOR AREA. 




440 


002322 


022021 








CMP 


(R0)+.(R1)+ 


;P0P POINTERS 




441 


002324 


022700 


001000 






CMP 


#1000,R0 


; ALL DONE?? 




442 


002330 


001372 








BNE 


4$ 


; BR IF NO. 




443 
444 












; TEST 


START AND RESTART 






445 




















446 




















447 


002332 


01 2737 


000340 


177776 


.BEGIN: 


MOV 


#340, PS 


; LOCK OUT INTERRUPTS 




448 


002340 


01 2706 


001200 






MOV 


#stack;sp 


;SET UP STACK 




449 


002344 


005737 


000042 






TST 


@#42 


;IS PROGRAM UNDER MONITOR CONTROL 




450 


002350 


001023 








BNE 


3$ 


; BR IF YES 




451 


002352 


032777 


000004 


176622 




BIT 


#BIT2,@SWR 


; CHECK FOR LOCK ON TEST 




452 


002360 


00141 1 








BEQ 


1$ 


; BR IF NO LOCK DESIRED. 




453 


002362 


104402 


005301 






TYPE 


,MLOCK 


; TYPE LOCK SELECTED. 




454 


002366 


012737 


000240 


002702 




MOV ; 


# NOP, T TST 


; ADJUST SCOPE ROUTINE. 




455 


002374 


01 2737 


000240 


002704 




MOV 


' #N0P,TTST+2 


;SET UP TO LOCK 




456 


002402 


000406 








BR 


2$ 


; CONTINUE ALONG. 




457 


002404 


013737 


003014 


002702 


1$: 


MOV 


BRW.TTST 


; PREPARE NORMAL SCOPE ROUTINE 




458 


002412 


01 3737 


003016 


002704 




MOV 


BRX.TTST+2 


;L0CK NOT SELECTED, SET UP FOR NORMAL 


SCOPE 


459 


002420 








2$: 










460 


002420 


012737 


005666 


001214 


3$: 


MOV 


#CYCLE, RETURN 


; START AT "CYCLE" FIND WHICH DEVICE TO 


TEST 


461 


002426 


104402 


005171 




4$: . 


TYPE 


, MR 


; TYPE R 




462 


002432 


000177 


176556 






UMP 


©RETURN 


{START. TESTING 
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463 








464 








465 








466 
























/IRQ 


00243c 


000005 






002440 


005037 


001 234 


471 


002444 


1 05037 


001311 




002450 


0C 5237 


00 1 230 




002454 


01 3777 


001 230 


Jz 


0024O2 


1 04402 


0051 45 


475 


002466 


1 04402 


005330 


476 


002*172 


1 044 1 1 


0026C4 


477 


UUac*4 / 


1 IPS A A f\ 1 
1 V *«H02 


005336 


4?Q 


002502 


1 0441 1 


00261 2 


479 


002506 


1 04402 


UU9gH<t 


480 


0025 1 2 


1 0441 1 


O09R9O 


481 


00251 6 


1 04402 


AAe«ce 

U U 30w3 


482 


002522 


1 0441 1 




483 


002526 


1 05337 


001 ^oi 


484 


002532 


001017 




485 


002534 




000177 


486 


002542 


1 1 3737 


001 "301 
UU 1 <9w 1 


487 


009RG?0 




OOOO/IO 


488 


002554 


OO 1 dOfi 
WW 1 tuo 




469 


002556 


Ooooo^ 

UU 




490 


002560 






491 


002560 


00471 1 




492 


002562 


nnnoan 

UU U/HU 




493 


002564 


WW UcHU 




494 




uu Ufiu 




495 


002570 


0009*10 




496 


002572 


01 2737 


UU jOOD 


497 


002600 


WWW \ O 1 


UU WOOD 


498 


002604 


000001 




499 


ooofiOfi 

vUcDUO 


006 


009 


500 


WWtffQ 1 U 


00 1 '^R'i 




501 


0026 1 2 


uu uuu 1 




502 


00261 4 




002 


503 


UUiD 1 


AA4 "SEA 
UU 1 




504 




AAAAA< 
UU UU U 1 




505 






002 


506 


002624 


00 1 210 




507 


002626 


onoooi 




508 


002630 


006 


002 


509 


002632 


001232 




510 








511 








512 








513 








514 


002634 






515 


002634 


022737 


177570 


516 


002642 


00141 1 




517 


002644 


017746 


176336 


518 


002650 


042716 


000200 



; END OF PASS 

; TYPE NAME OF TEST 

J UPDATE PASS COUNT 

; CHECK FOR EXIT TO ACT-1 1 

; RESTART TEST 



001313 
001303 



001214 RESTRTi 



RESET 




CLR 


LSTERR 


CLR8 


ERRFLG 


INC 


PASCNT 


MOV 


PASCNT .(PLIGHTS 


. TYPE 


.MEPASS ... 


TYPE 


,MCSRX 


CNVRT 


, XCSR 


TYPE 


I.MVECX 


CNVRT 


t XVEC 




MDACCV 


CNVRT 




TYPE 


MCfJDV 
, IVltKKA 


CNVRT 


1 XERR 


DECS 


SAVNUM 






M0VB 


*377,QV.n.G 


M0VB 


DVNUM, SAVNUM 




0iC42»R1 


BEQ 


RESTRT 


RESET 




JSR 


PC,(R1) 


NOP 








NOP 




NOP 




MOV 


#CYCLE, RETURN 


JMP 
1 


CYCLE 


. BYTE 


6,2 


DVSCR 




1 

. BYTE 


3,2 


DVRVEC 
1 




. BYTE 


6,2 


PASCNT 




1 

. BYTE 


6,2 


ERRCNT 





{MAKE THE WORLD CLEAN AGAIN. 
{CLEAR LAST ERROR PC 
{CLEAR ERROR FLAG 
{UPDATE PASS COUNT 
{DISPLAY PASS COUNT 
{TYPE END PASS 
{ TYPE CSR 
; SHOW IT 
I TYPE VECTOR N 
\ SHOW IT 
{TYPE PASSES 
{ SHOW IT 
. } TYPE ERRORS 
{SHOW IT 

{ARE ALL DEVICES TESTED? 
{BR IF NO. 

{SET THE QUICK VERIFY FLAG. 
{RESTORE THE COUNT 
{CHECK FOR ACT-1 1 OR DDP 
{ IF NOT, CONTINUE TESTING 
{STOP THE SHOW— CLEAR THE WORLD 



{ SCOPE LOOP AND INTERATION HANDLER 



CMP 
BEQ 
MOV 
BIG 



#1 77570, SWR 
64$ 

©TKDBR.-(SP) 
#BIT7,(SP) 



{IS THERE A REAL SWR? 
{ BR IF YES 
{SAVE KEYBOARD CHAR 
{CLEAR PARITY BIT 
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GENERAL 


519 


002S54 


122726 


000007 






520 


0026S0 


001002 








521 


002662 


004737 


004640 






522 


002666 


005037 


001234 




64$: 


523 


002672 


010016 








524 


002674 


032777 


040000 


176300 




525 


002702 


001407 






TTST: 


526 


002704 


000437 








527 


002706 


105777 


176272 






523 


002712 


100034 








529 


002714 


017700 


176266 






530 


002720 


000415 








531 


002722 


032777 


004000 


176252 


1$: 


532 


002730 


001011 








533 


002732 


105737 


001313 






534 


002736 


001406 








535 


002740 


005237 


001224 






536 


002744 


023737 


001224 


001222 




537 


002752 


001014 








538 


002754 


105037 


001311 




2$: 


539 


002760 


005037 


001224 






540 


002764 


005037 


001220 






541 


002770 


012737 


000024 


001222 




542 


002776 


0137-7 


001216 


001214 




543 


003004 


01 1600 






3$: 


544 


003006 


022626 








545 


003010 


000177 


176200 






543 


003014 


001407 






BRW5 


547 


003016 


000437 






BRX*. 


548 












549 












550 












551 












552 


003020 


032777 


001000 


178154 


.SC0P1: 


553 


003026 


001405 








554 


003030 


005737 


001220 






555 


003034 


001402 








556 


003036 


013716 


001220 






557 


003042 


000002 






1$: 


558 












559 












560 












561 












562 


003044 


010546 






.TYPE: 


563 


003046 


017605 


000002 






564 


003052 


062766 


000002 


000002 




565 


003060 


032777 


010000 


176114 


1$: 


566 


003066 


001012 








567 


003070 


105715 








568 


003072 


100002 








569 


003074 


104402 


005104 






570 


003100 


105777 


176104 




2$: 


571 


003104 


100375 








572 


003106 


112577 


176100 






573 


0031 12 


001362 








574 


003114 


012605 






3$: 



CMPS 


*7,(SP)+ 


{WAS IT CNTRL 'G' ? 




BNE 


.+6 


{BR IF NO. 




JSR 


PCSERV.G 


{SERVICE "CNTRL 1 G' " • 




CLR 


LSTERR 


{CLEAR LAST ERROR PC. 




MOV 


R0,(5P) 


{SAVE RO ON THE STACK 




BIT 


#BIT14,9SWR 


, {"LOOP ON THIS TEST"? 




BEQ 


1$ 


{ BR IF NO. (IF LOCK SW01»1{ THIS 


LOG »240) 


BR 


3$ 


{GOTO 3$ (IF LOCK SW01-1 J THIS 


LOC "240) 


TSTB 


9TKCSR 


{KEYBOAD DONE? 




BPL 


3$ 


; BR IF NO. ( LOCK: HIT KEY TO GOTO 


NEXT TEST) 


MOV 


CTKDBR , RO 


{CLEAR DONE BIT 




BR 


2$ 


{CONTINUE 




BIT 


4SW11 ,*SWR 


{ DELETE ITERATION? (QUICK PASS) 




BNE 


2$ 


; BR IF YES 




TSTB 


QV.FLG 


{HAVE PASSES BEECOMPLETED? 




BEQ 


2$ 


; BR IF QUICK PASS. 




INC 


LPCNT 


{UPDATE ITERATION COUNTER 




CMP 


LPCNT, I COUNT 


{ARE ALL ITERATIONS DONE?? 




BNE 


3$ 


; BR IF NOT YET 




CLRB 


ERRFLG 


; PREPARE FOR NEW TEST 




CLR 


LPCNT 


{START I COUNTER AT 




CLR 


LOCK 




MOV 


#20.,ICOUNT 


; RESET ITERATIONS 




MOV 


NEXT, RETURN 


{GET NEXT TEST 




MOV 


(SP),R0 


{ POP RO OFF OF THE STACK 




P0P2SP 




{FAKE AN "RTI " 




MP 


©RETURN 


{GO DO THE TEST 




1407 








437, 








{CHECK 


FOR FREEZE ON 


CURRENT DATA 




BIT 


#SW09,tSWR 


{IS 5W09-1 (SET) ? 




BEQ 


1$ 


{BR IF NOT SET. 




TST 


LOCK 






BEQ 


1$ 






MOV 


LOCK, (SP) 


; GOTO THE ADDRESS IN LOCK. 




RTI 


{GO BACK. 





{TELETYPE OUTPUT ROUTINE 



MOV 


R5,-(SP) 
»2(SP),R5 


; SAVE R5 ON THE STACK. 


MOV 


{GET ADDRESS OF MESSAGE. 


ADD 


#2,2(SP) 


5 POP OVER ADDRESS. 

; INHIBIT ALL PRINT OUT?? 


BIT 


#SW12,6SWR 


BNE 


3$ 


; BR IF NO PRINT OUT WANTED (SW12-1) 


TSTB 


(R5) 


;IS NUMBER MINUS? (MSB-1 ( BIT7) ) 


BPL 


2$ 


; BR IF NUMBER IS PLUS 


TYPE 


.MCRLF 


{TYPE A CR/LFI 


TSTB 


•TPCSR 


jTTY READY? 


BPL 


2$ 


;BR IF NO. 


MOVB 


(R5)+,©TP0BR 


{PRINT CURRENT CHAR. 


BNE 


1$ 


;IF NOT ZERO KEEP PRINTING! 


MOV 


(SP)+,R5 


{END OF OUTPUT. RESTORE R5 
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GENERAL UTILITIES (TYPE OUT , ERROR , SCOPE , ETC . ) 



SEO 0084 



575 


oo^i 1 s 


000002 




576 








577 








578 


0031 20 


01 03^6 






003 1 22 


01 044fi 




580 


0031 24 


01 7637 


000004 




oo'si *5!3 

UU J 1 u«t 


W w a r w w 


000002 


582 


Ami ar 








UUJ 1 'id. 


floooofl 




584 


0031 44 


1 2704 


005520 


585 


a ao 4 en 

UUJ 1 3U 


2703 


000007 

WW WWW 1 


586 


0031 54 


1 05777 


1 76024 




Art's i an 

UUJ 1 gU 


1 rtrti7t? 
■ uuj /a 




588 


0031 62 


1 1 771 4 


1 76020 


5S§ 


Www 1 69 


1 4271 4 


000200 


590 


0031 72 


1 22427 


00001 5 


591 


0031 76 


001417 




592 


oo*?90fl ' 


1 05777 


1 76004 


593 


003204 


1 00375 




594 


003906 


01 7777 


1 75774 


595 


0032 1 4 


005303 




596 


0032 1 6 


001 356 




597 


003220 


01 2604 




598 


003222 


01 2603 




599 


003224 


1 04402 


0051 00 


600 


oo*s.9*5.o 


01 0346 




60 1 


VWW& 


01 0446 




602 


V w J e <3 *f 


000741 




603 


W UdiliJO 


1 2604 




604 


00*9940 


01 ORG'S. 




605 


003242 


000002 

WW WWW& 




606 








607 








608 








609 








61 


003244 


01 0546 




611 


003246 


01 0446 




61 2 


00^930 

W W J £t W 


01 ££05 


000004 


61 3 


003254 


01 2537 


003434 


614 


OO'SOfiQ 

W wv 


01 2537 


003436 


61 5 


003264 


01 2537 


003440 


616 


003970 


1 1 2537 


003442 


61 7 


003274 


1 1 2537 


003443 


61 8 


001^00 


01 0«SSfl 


000004 


61 i i 


OO'S'SflA 


005008 

W W W U 9 




620 ' 


003306 


01 2704 


005520 


621 


003312 


122714 


000015 


622 


003316 


001420 




623 


003320 


121427 


000060 


624 


003324 


002415 




625 


003326 


121427 


000067 


626 


003332 


003012 




627 


003334 


142714 


000060 


628 


003340 


152405 




629 


003342 


122714 


000015 


630 


003346 


001406 





003142 
000004 



.INSTR! 



.INST 18 
.MSG: 



MOV 
MOV 
MOV 
A00 
TYPE 


MOV 
MOV 
TSTB 
BPL 
M0VB 
BICB 
CMPB 
BE0 
TSTB 
BPL 
MOV 
DEC 
BNE 
MOV 
MOV 
.INSTE: TYPE 
MOV 
MOV 
BR 

INSTR2: MOV 

MOV 
RTI 



1$J 



2$s 



R3,-(SP) 
R4,~(SP) 
04(SP) f .MSG 
#2,4(SP) 



- #INBUF,R4 
17, R3 
9TKCSR 
1$ 

&TKDBR, (R4) 

#200, (R4) 

(R4)+,#1S 

INSTR2 

tTPCS'R 

2$ 

eTKDBR.GTPDBR 

R3 

1$ 

(SP)+,R4 
(SP)+,R3 
,MQM 

R3,-(SP) 
R4,~(SP) 
. INST1 
(SPJ+.R4 
(SP)+,R3 



{SAVE R3 ON STACK 
;SAVE R4 ON STACK 



; RESTORE R4 
; RESTORE R3 



{CONVERT ASCII STRING TO OCTAL 



.PAR AM: MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOVB 

M0VB 

MOV 

PARAM1 I CLR 
MOV 
CMPB 
BEQ 

1$: CMPB . 
BLT 
CMPB 
BG T 
BICB 
BISB 
CMPB 
BEQ 



R5,-(SP) 
R4,-(SP) 
4(SP) ,R5 

(RS)+, LOLIM 

(R5)+,HILIM 

(R5)+, DEVADR 

(R5)+,L0BITS 

(R5) + » ADRCNT 

RS,4(SP) 

R5 

#INBUF,R4 

#15, (R4) 

PARERR 

(R4),#60 

PARERR 

(R4),#6? 

PARERR 

#60, (R4) 

(R4)+,R5 

#15, (R4) 

LIMITS 
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SEQ 002B 



631 
632 
633 
634 
635 
636 
637 
638 
639 
640 
641 
642 
643 
644 
B4i5 
646 
647 
648 
649 
650 
651 
652 
653 
654 
655 
656 
657 
658 
659 
660 
661 
662 
663 
664 
665 
666 
667 
666 
669 
670 
671 
672 
673 
674 
675 
676 
677 
678 
679 
680 
681 
682 
683 
684 
685 
686 



003350 006305 

003352 006305 

003354 006305 

003356 000760 

003360 104404 

003362 000750 



003364 
003370 
003372 
0033*76 
003400 
003404 



003406 
003412 
003414 
003420 
003424 
003426 
003430 
003432 
003434 
003436 
003440 
003442 



003452 
003456 
003462 
003466 
003472 
003476 
003502 



003504 
003510 
003514 
003520 
003524 
003530 



020537 
101373 
020537 
109770 
133706 
001368 



013704 
010524 
062705 
105337 
001372 
012604 
012605 
000002 
000000 
000000 
000000 
000000 
003443 



010537 
010437 
010337 
01 0237 
010137 
010037 
000002 



013700 
013701 
013702 
013703 
013704 
013705 



ASL 
ASL 

ASL 
BR 

INSTER 

BR * 



? TEST TO SEE IF NUMBER IS WITHIN LIMITS 



003436 
003434 
009449 



000002 

003443 



CMP 
BHX . 
CMP 
BLfi 

lit! 

BNE 



R5.HILIM 

PARERR 
R5« LOLIM 
PARERR 

kOltTMl 

PARERR 



; STORE NUMBER AT SPECIFIED ADDRESS 



LOLIM*. 
HILIM: 
DEVADR: 
LOSITSl 



MOV 

MOV 
ADD 
DECS 
BNE 
MOV 
MOV 
RTI 







DEVADR, R4 
R5,(R4)+ 

#2,R5 
ADRCNT ' 
1$ 

(SPH.R4 
(SP)+,R5 



ADRCNT* LOB I TS+1 



? SAVE PC OF TEST THAT FAILED AND RO-RS 



003444 016637 000004 



001276 .SAV05: MOV 4(SP) .SAVPC 
{SAVE R0-R5 



001,272 
001270 
001266 
001264 
001262 
001260 



001260 
001262 
001264 
001266 
001270 
001272 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTI 



RB,SAVR5 
R4,SAVR4 
R3,SAVR3 
R2,SAVR2 

R1 ,SAVR1 
R0,SAVR0 



{RESTORE R0-R5 



•RES05: MOV 

MOV 
MOV 
MOV 
MOV 
MOV 



SAVRO.RO 
SAVR1 ,R1 
SAVR2,R2 
SAVR3,R3 
SAVR4.R4 
SAVR5.R5 



{SAVE R7 (PC) 



{ SAVE RS 

{SAVE R4 

{SAVE R3 

{SAVE R2 

{SAVE R1 

{SAVE RO 
; LEAVE. 



{ RESTORE RO 

{RESTORE R1 

{RESTORE R2 

{RESTORE R3> 

{RESTORE R4 

{RESTORE RS 
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687 


003534 


000002 




688 
689 








690 








691 








692 


003536 


104402 


005104 


693 


003542 


01 0046 




694 


003544 


010146 




695 


003546 


010346 




696 


003550 


01 0446 




697 


003552 


01 0546 




698 


003554 


01 7601 


000012 


699 


003560 


062766 


000002 0000 


700 


003566 


01 2137 


003742 


701 


003572 


112137 


003744 


702 


003576 


112137 


003745 


703 


003602 


01 3137 


003746 


704 


003606 


013704 


003746 


705 


003612 


1 1 3705 


003744 


706 


003616 


012700 


005562 


707 


003622 


01 0403 




708 


003624 


042703 


177770 


709 


003630 


062703 


000060 


710 


003634 


1 1 0320 




711 


003636 


000241 




712 


003640 


006004 




713 


003642 


000241 




714 


003644 


006004 




715 


003646 


000241 




716 


003650 


006004 




717 


003652 


0C5305 




718 


003654 


001362 




719 


003656 


012703 


005624 


720 


003662 


1 14023 




721 


003664 


105337 


003744 


722 


003670 


001374 




723 


003672 


105737 


003745 


724 


003676 


001405 




725 


003700 


112723 


000040 


726 


003704 


105337 


003745 


727 


003710 


001373 




728 


003712 


105013 




729 


003714 


104402 


005624 


730 


003720 


005337 


003742 


731 


003724 


001322 




732 


003726 


01 2605 




733 


003730 


01 2604 




734 


003732 


01 2603 




735 


003734 


01 2601 




736 


003736 


01 2600 




737 


003740 


000002 




738 


003742 


000000 




739 


003744 


000000 




740 




003745 




741 


003746 


000000 




742 









RTI 

; CONVERT OCTAL NUMBER 



.CONVR: 


TYPE 


,MCRLF 


.CNVRT: 


MOV 


RO,-(SP) 




MOV 


R1,-(SP) 




MOV 


R3,-(SP) 




MOV 


R4,-(SP) 




MOV 


R5,-(SP) 




MOV 


@>12(SP) ,R1 




ADD 


#2,12(SP) 




MOV 


(R1 )+, WRDCNT 


1$: 


MOVB 


(R1 )+, CHRCNT 




MOVB 


(R1 )+, SPACNT 




MOV 


ff>(R1 )+,BINWRD 


2$: 


MCV 


BINWRD , R4 




MOVB 


CHRCNT , R5 




MOV 


#TEMP,RO 


3$: 


MOV 


R4,R3 




BIC 


#177770, R3 




ADD 


#060, R3 
R3,(R0)+ 




MOVB 




CLC 






ROR 


R4 




CLC 






ROR 


R4 




CLC 






ROR 


R4 




DEC 


R5 




BNE 


3$ . 




MOV 


#MDATA,R3 


4$: 


MOVB 


-(RO) , (R3)+ 




DECB 


CHRCNT 




BNE 


4$ 




TSTB 


SPACNT 




.BEQ 


6$ 


B$: 


MOVB 


#040 , ( R3)*f 


DECB 


SPACNT 




BNE 


5$ 


6$: 


CLRB 


(R3) 




TYPE 


,MDATA 




DEC 


WRDCNT 




BNE 


1$ 




MOV 


(SP)+,R5 




MOV 


(SP)+,R4 




MOV 


(SP)+,R3 




MOV 


(SP)+,R1 




MOV 


(SP)+,RO 




RTI 




WRDCNT : 







CHRCNT: 








SPACNT=CHRCNT+1 



; LEAVE 

TO ASCII AND OUTPUT TO TELEPRINTER 
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743 
744 
745 
746 
747 
748 



{ TRAP DISPATCH SERVICE 

; ARGUMENT OF TRAP IS EXTRACTED 

; AND USED AS OFFSET TO OBTAIN POINTER 

{TO SELECTED SUBROUTINE 



749 


003750 


01 1646 






.TRPSR: 


MOV 


750 


003752 


162716 


000002 






SUB 


751 


003756 


01 7616 


000000 






MOV 


752 


003762 


006316 






TRPOK: 


ASL 


753 


003764 


0'.2716 


177001 






BIC 


754 


003770 


062716 


001314 






ADD 


755 


003774 


01 7616 


000000 






MOV 


756 


004000 


000136 








UMP 


757 














758 












; ERROR 


759 














760 














761 


004002 








.HLT: 




762 


004002 


022737 


177570 


001202 




CMP 


763 


004010 


00141 1 








BEQ 


764 


004012 


01 7746 


175170 






MOV 


765 


004016 


042716 


000200 






BIC 


766 


004022 


122726 


000007 






CMPB 


767 


004026 


001002 








BNE 


768 


004030 


004737 


004640 






JSR 


769 


004034 


032777 


010000 


175140 


64$: 


BIT 


770 


004042 


001406 








BEO 


771 


004044 


105777 


175140 






TSTB 


772 


004050 


100003 








BPL ■ 


773 


004052 


112777 


000207 


175132 




MOVB * 


774 


004060 


032777 


020000 


175114 


XBX: 


BIT 


775 


004066 


001 105 








BNE 


776 


004070 


021637 


001234 






CMP 


777 


004074 ' 


001404 








BEQ 


778 


004076 


01 1637 


001234 






MOV 


779 


004102 


105037 


001311 






CLR3 


780 


004106 


104406 






1$: 


SAV05 


781 


0041 10 


01 1605 








MOV 


782 


0Q41 12 


1627Q5 


000002 






SUB 


783 


QJ41 16 


011504 








MOV 


784 


004120 


006304 








ASL 


785 


004122 


061504 








ADD 


786 


004124 


006304 








ASL 


787, 


004126 


042704 


177001 






BIC 


788 


004132 


062704 


034404 






ADD 


789 


0041 36 


01 2437 


004252 






MOV 


790 


004142 


01 2437 


004264 






MOV 


791 


004146 


01 1437 


004276 






MOV , 


792 


004152 


105737 


001311 






TSTB 


793 


004156 


001403 








BEQ 


794 


004160 


005737 


004276 






TST 


795 


004164 


001040 








BNE 


796 


004166 


104402 


005104 




TYPMSG: 


TYPE 


797 


004172 


104402 


005104 






TYPE 


798 


004176 


005737 


001220 






TST 



(SP).-(SP) 

#2,(SP) 
@(SP) , (SP) 
(SP) 

#177001 , (SP) 
#.TRPTAB, (SP) 
•■(SP).(SP) 
@(SP)+ 



#1 77570, SWR 
64$ 

@TKDBR,-(SP) 
#BIT7,(SP) 
#7,(SP)+ 
.+6 

PCSERV.G 

#SW12,@SWR 

XBX 

©TPCSR 
XBX 

#207,@TPDBR 

#SW13,@SWR 

HALTS 

(SP),LSTERR 
1$ 

(SP), LSTERR 
ERRFLG 

(SP),R5 
#2,R5 
(R5),R4 
R4 

(R5), R4 
R4 

#177001 »R4 
# , ERRTAB, R4 
(R4)+, ERRMSG 
(R4)+, DATAHD 
( R4) , DATABP 
ERRFLG 
TYPMSG 
DATABP 
TYPDAT 
.MCRLF 
♦MCRLF 
LOCK 



;GET PC OF RETURN 
;=PC OF TRAP 
;GET TRP 

{MULTIPLY TRAP ARG BY 2 

; CLEAR UNWANTED BITS 

; POINTER TO SUBROUTINE ADDRESS 

{SUBROUTINE ADDRESS 

;G0 TO SUBROUTINE 



;IS THERE A REAL SWR? 
; BR IF YES 
{SAVE KEYBOARD CHAR 
; CLEAR PARITY BIT 
{WAS IT CNTRL '6' ? 
; BR IF NO. 

; SERVICE "CNTRL 'G' * . 
{ BELL ON ERROR? 
; BR IF NO BELL 
{TTY READY. 

; DON'T WAIT IF TTY NOT READY. 

{PUSH A BELL AT THE TTY. 

; DELETE ERROR PRINT OUT? 

; BR IF NO PRINT OUT WANTED, 

;WAS THIS ERROR FOUND LAST TIME? 

; BR IF YES 

; RECORD BEING HERE 

; PREPARE HEADER 

; SAVE ALL PROC REGISTERS 

{GET THE PC OF ERROR 

j GET ADPRESS OP TRAP CAU 

| GET HLT INSTRUCTION 

{MULT BY TWO 

; DOUBLE IT 

{MULT AGAIN 

; CLEAR JUNK 

;GET POINTER 

;GET ERROR MESSAGE 

;GET DATA HEADRER 

;GET DATA TABLE 

{TYPE HEADREER 

•,BR IF YES 

{DOES DATA TABLE EXIST? 
{BR IF YES. 



CZDVDCO 


MACY1 1 


30A(1052 


1 0-FE 


CZDVDC . 


P11 02-FEB-78 


13:55 


799 


004202 


001402 






004204 


1 04402 


005400 




0042 1 


1 04402 


005366 


OAO 


00421 4 


1 044 1 1 


004374 


AO 

803 


004220 


1 04402 


005454 


804 






004366 


, 805 


004230 


i a a a a o 




806 


004234 




1 77777 


807 


004242 


005737 


004252 


808 


004246 


UU itU/ 




809 


004250 


^ 4402 




810 


004252 


A A ftAAH 

u u u u u u 




81 i 


004254 






812 


0042S4 


oy@ r 3 / 


004264 


813 


r\ t\ a ^ (Si n 


001 402 




814 


004262 


1 04402 




815 


004264 


000000 




816 


004266 


005737 


004276 


817 


004272 


00 1 402 




« 1 « 


004274 


1 0441 




819 


004276 


000000 




820 


004300 


104407 




821 


004302 


005777 


1 74674 


822 


004306 


1 00005 




823 


0043 1 


01 0046 




824 


00431 2 


01 6600 




825 


00431 6 


000000 




826 


004320 


01 2600 






004322 


005237 


001 232 


828 


004326 


032777 


000400 


829 


004334 


00 1 007 




830 


004336 


032777 


n no on n 


831 


004344 


001407 




832 


004346 


01 3737 


001216 


8 o/i 


004354 


01 2706 


001 200 




004360 


000177 


1 74630 




004364 


000002 






004366 


000001 






004370 


006 


002 




004372 


001276 




839 


004374 


000001 






004376 


003 


002 




004400 


001226 




























845 








846 


004402 






847 


004402 


01 2737 


004414 


848 


004410 


000000 




849 


004412 


0C0777 




850 








851 








852 








853 


004414 






854. 


004414 


01 2737 


004402 
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BEQ 


1$ 




TYPE 


,MASTEK 


1$: 


TYPE 


, MTSTN 




CNVRT 


, XTSTN 




TYPE 


,MERRPC 




CNVRT' 


, ERTABO 




TYPE 


,MCRLF 




MOVB 


, ERRFLG 




TST 


ERRMSG 




BEQ 


WRKO.FM 




TYPE 




ERRMSG:. 







WRKO . FM : 








datahd 






T¥PBAf 




TYPE 




DATAHD : 







TYPDAT : 


TST 


DATABP 




BEQ 


RESREG 




CONVRT 




DATABP: 







RESREG : 


RES05 




HALTS: 


TST 


@SWR 




BP L 


EXITER 




PUSHR0 






MOV 


2(SP),R0 




HALT 






POPR0 




EXITER: 


INC 


ERRCNT 




BIT 


#SW08,@SWR 




BNE 


1$ 




BIT 


#SW10,@SWR 




BEQ 


2$ 




MOV 


NEXT, RETURN 


1$: 


MOV 


#STACK f SP 




JMP 


^RETURN 


2$ : 


RTI 




ERTAB0: 


1 






. BYTE 


6,2 




SAVPC 




XTSTN: 


1 






. BYTE 


3,2 




TSTNO 





SHOW IT 
TYPE PC. 
SHOW IT 
GIVE A CR/LF 

NO MORE HEADER UNLESS NO DATA TABLE. 
IS THERE AN ERROR MESSAGE? 
BR IF NO. 
TYPE 

ERROR MESSAGE 
DATA HEADER? , 

m if m 

TYPE 

DATA HEADER 
DATA TABLE? 
BR IF NO. 
SHOW 

DATA TABLE 
RESTORE PROC REGISTERS 
HALT ON ERROR? 
BR IF NO HALT ON ERROR 
SAVE RO 

SHOW ERROR PC IN DATA LIGHTS 

HALT 

GET RO 

UPDATE ERROR COUNT 
GOTO TOP OF TEST? 
BR IF YES 
GOTO NEXT TEST? 
BR IF NO 

SET FOR NEXT TEST 
RESET SP 

GOTO SPECIFIED TEST 
RETURN 



; ENTER HERE ON POWER FAILURE 



^RESTART , 24 



;SET UP FOR POWER UP TRAP 
; HALT ON POWER DOWN NORMAL 



MOV 
HALT 

BR 

; PROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 
MOV #.PFAIL,24 • ;SET UP FOR POWER FAILURE 



CZDVDCO MACY11 30A(1052) 10-FEB-78 15:44 PAGE 19 

CZDVDC. P11 02-FEB-78 13:55 GENERAL UTILITIES (TYPE OUT , ERROR , SCOPE , ETC . ) 



855 


004422 


01 2706 


001200 






MOV 


#STACK,SP 


; RESET THE STACK POINTER 


856 


004426 


005037 


005562 






CLR 


TEMP 


; READY FOR TIMMER 


857 


004432 


0C5237 


005562 






INC 


TEMP 


;PLUS ONE TO THE TIMER! 


858 


004436 


001375 








BNE 


.-4 


; BR IF MORE TO GO 


859 


004440 


104402 


005107 






TYPE 


, MPFA I L 


; TYPE THE MESSAGE 


860 


004444 


10441 1 


004470 






CNVRT 


, PFTAB 


; TELL WHAT TEST TO RETURN TO. 


861 


004450 


105037 


001311 






CLRB 


ERRFLG 


; START CLEAN 


862 


004454 


005037 


001234 






CLR 


LSTERR 




863 


004460 


104412 








MSTCLR 




•START CLEAN UP OF DEVICE 


854 


004462 


104413 








RAMCLR 




; CLEAR IT ALL! 


865 


004464 


0001 77 


174524 






UMP 


©RETURN 


; START DOING THAT TEST AGAIN. 


866 


004470 


000001 






PFTABr 


1 






867 


004472 


003 


002 




.BYTE 


3,2 






868 


004474 


001226 








TSTNO 






869 


004476 


01 0046 






. DELAY: 


MOV 


R0,-(SP) 




870 


004500 


01 3700 


004514 






MOV 


1$,R0 




871 


004504 


005300 








DEC 


RO 




872 


004506 


001376 








BNE 


.~2 




873 


004510 


01 2600 








MOV 


(SP)+,R0 




874 


004512 


000002 








RTI 






875 


004514 


000036 






1$: 


30. 






876 


















877 


004516 








. RAMCLR 








878 


004516 


01 2777 


004000 


174636 




MOV ; 


#MRESET,©DVSCR 


; ISSUE A MASTER CLEAR 


879 


004524 


01 0146 








MOV 


R1 ,-(SP) 


JSAVE R1 ON THE STACK 


880 


004526 


01 0446 








MOV 


R4,-(SP) 


;SAVE R4 ON THE STACK 


881 


004530 


01 3701 


001372 






MOV 


DVSRS.R1 


; GET SECONDARY SEL. REG. 


882 


004534 


01 3704 


001376 






MOV 


DVSRA.R4 


; GET SECONDARY REGISTER ACCESS REG. 


883 


004540 


005014 






1$: 


CLR 


(R4) 


:2ER0 THE SECONDARY REGISTER. 


884 


004542 


06271 1 


170361 






ADD 


#~C<BIT11+BIT10+BIT9+BIT8+BIT3+BIT2+BIT1+BIT0>+BIT0.(R1 ) 


885 


004546 


0. 1374 








BNE , 


1$ 




886 


004550 


01 2604 








MOV 


(SP)+,R4 


; RESTORE R4 


887 


004552 


01 2601 








MOV 


(SP)+,R1 


; RESTORE R1 


888 


004554 


000002 








RTI 






889 


















890 


004556 








.MSTCLR 








891 


004556 


01 2777 


004000 


174576 




MOV 


#MRESET,@DVSCR 


; ISSUE MASTER CLEAR. 


892 
893 


004564 


000002 








RTI 






894 


004566 








. ROMCLK 








895 


004566 


052777 


000002 


174566 




BIS 


#BIT1 .GDVSCR 




896 


004574 


000002 








RTI 






897 


















893 


004576 








.DATACLK: 






899 


004576 


01 0046 








MOV 


RO.-(SP) 




900 


004600 


005000 








CLR 


RO 




901 


004602 


052777 


000400 


174560 




BIS 


#BIT8,®DVLCR 




902 


004610 


01 7737 


174554 


004636 


1$: 


MOV 


@DVLCR,3$ 




903 


004616 


106037 


004637 






RORB 


3$+1 




904 


004622 


103003 








BCC 


2$ 




905 


004624 


005200 








INC 


RO 




906 


004626 


001370 








BNE 


1$ 




907 


004630 


104000 








HLT 







908 


004632 


01 2600 






2$: 


MOV 


(SP)+,RO 




909 


004634 


000002 








RTI 






910 


004636 


000001 






3$: 


. BLKW 1 
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911 








912 


004640 


032777 


004000 


913 


004646 


001374 




914 


004650 


0177C 7 


174326 


91S 


004656 


01 3777 


005072 


918 


004664 


104402 


005052 


, 917 


004670 


104411 


005064 


91S 


004674 


104402 


005074 


§19 


004700 


105777 


174300 


920 


004704 


100375 




921 


004706 


01 7746 


174274 


922 


004712 


042716 


000200 


923 


004716 


122726 


00001S 


924 


004722 


001450 




925 


004724 


005077 


174252 


923 


004730 


105777 


1 74254 


927 


004734 


100375 




928 


004736 ' 


016677 


177776 


929 


004744 


000241 




930 


004746 


006177 


174230 


931 


004752 


006177 


174224 


932 


004756 


006177 


174220 


933 


004762 


103735 




934 


004764 


026627 


177776 


935 


004772 


002731 




936 


004774 


026627 


177776 


937 


005002 


003325 




93B 


005004 


042766 


177770 


939 


005012 


056677 


177776 


940 


005020 


105777 


174160 


941 


005024 


100375 




942 


005026 


01 7746 


174154 


943 


005032 


042716 


000200 


944 


005036 


122726 


000015 


945 


005042 


001332 




946 


005044 


104402 


005104 


947 


005050 


000207 




949 








949 


005052 


020377 


051450 


950 


005060 


036451 


000057 


951 








952 


005064 


000001 




953 


005066 


006 


000 


954 


005070 


005072 




955, 


005072 


000000 




956 


005074 


036457 


000057 


957 








959 


005100 


020040 


000077 


(2) 


005104 


005015 


000 


(2) 


005107 


377 


053520 


(2) 


005145 


377 


047105 


(2) 


005171 


377 


000122 


(2) 


005174 


050377 


047522 


(2) 


005243 


377 


047111 


(2) 


005267 


377 


042524 


(2) 


005301 


377 


047514 
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GENERAL UTILITIES (TYPE OUT , ERROR , SCOPE , ETC. ) 



005072 
174316 



020122 
020104 

051107 
052523 
052123 
045503 



SERV.Q: 
1$: 



2$: 



000060 
000067 



177776 
174182 



5$: 



051127 89$: 



. EVEN 
88$: 



90$: 
91$: 
. EVEN 
MOM: 
MCRLF: 
MPFAIL! 
MEPASS1 
MR 5 

MERR2: 
MERR3: 
MTSTPC! 

mlock: 



BIT 

BNE 

MOV 

MOV 

TYPE 

CNVRT 

TYPE 

TSTB 

BPL 

MOV 

BIC 

CMPB 

BEQ 

CLR 

TSTB 

BPL 

MOV 

CLC 

ROL 

ROL 

ROL 

BCS 

CMP 

BLT 

CMP 

BGT 

BIC 

BIS 

TSTB 

BPL 

MOV 

BIC 

CMPB 

BNE 

TYPE 

RTS 



14000, tTKCSR 

SERV.G 

0SWR,9O$ 

90$,f>SWR 

,89$ 

,88$ 

,91$ 

•TKCSR 

.-4 

•TKDBR.-(SP) 
#BIT7,(SP> 
#1B,(SP)+ 
5$ 

9SWR 

•TPCSR 

.-4 

-2(SP),*TPDBR 

(PSWR 

oswr 

(PSWR 

1$ 

-2(SP),#60 
1$ 

-2(SP),#67 
1$ 

<TC<7>,-2(SP) 

-2(SP),*SWR 

OTKCSR 

.-4 

*TKDBR,-(SP) 
#BIT7,(SP) 
#15,(SP)+ 
2$ 

, MCRLF 
PC 



;RX BUSY? 
5 BR IF YES 
{SAVE (SWR). 



{WAIT FOR DONE. 



; ERROR 



. ASCIZ <377>? (SWRW? 



1 

. BYTE 
90$ 
.WORD 
.ASCIZ 

.ASCIZ 
>. ASCI.Z 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 



6,0 


?/■/? 

/ ?/ 
<15><12> 

<377>/PWR FAILED. RESTART AT TEST / 
<377>/END PASS CZDVDCO / 
<377>/R/ 

<377>/PR0GRAM INDICATES NO DEVICES PRESENT./ 

<377>/INSUFFICIENT DATA!/ 

<377>/TEST PC-/ 

<377>/L0CK ON SELECTED TEST/ 
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CZDVDC.P11 i 


02-FEB-78 


13:55 




GENERAL 


.UTILITII 


(2) 


005330 


051503 


035122 


000040 


MCSRXS 


.ASCIZ 


(2) 


005336 


042526 


035103 


000040 


MVECX! 


.ASCIZ 


(2) 


005344 


040520 


051523 


051505 


MPASSX: 


.ASCIZ 


(2) 


005355 


105 


0S1122 


051117 


MERRX: 


.ASCIZ 


(2) 


005366 


042524 


052123 


047040 


MTSTN: 


.ASCIZ 


(2) 


005400 


000052 






MASTEK: 


.ASCI'Z 


(2) 


005402 


051777 


052105 


051440 


MNEW: 


.ASCIZ 


(2) 


005454 


041520 


020072 


000 


MERRPC! 


. ASCIZ 


(2) 


005461 


377 


040515 


020120 


xhead: 


.ASCIZ 


(2) 










. EVEN 




(2) 


005506 


000002 






xstatq: 


2 


959 


005510 


.006 


003 






. BYTE 


960 


005512 


001246 








TEMPI 


961 


005S14 


006 


062 






. BYTE 


962 


005516 


001250 








TEMP2 


963 










. EVEN 


964 














965 












; BUFFERS 


966 














967 


005520 


000000 






INBUF: 





968 




005562 






.-.+40 




969 


005562 


000000 






TEMP: 





970 




005624 






.a. +40 




971 


00S624 


000000 






mdata: 





972 




005666 






.*.+40 





/CSR: / 
/VEC: / 
/PASSES: / 
/ERRORS: / 
/TEST NO: / 
/*/ 

<377>/SET SWITCH REG TO DV11 'S DESIRED ACTIVE./ 
/PC: / 

<377>/MAP OF DV11 STATUS/<377> 



6,3 



6,2 



C2DVDC0 


MACY1 1 


30A(1052) 


1 Szf^ 


CZDVDC . 


P11 '02-FEB-78 


1 3 : 5b 


973 








974 








975 








976 








977 








978 








, 979 








980 








981 








982 


005666 


1 5737 


001 300 


983 


005672 


AA1 Art/1 




984 


005674 




0051 74 


985 


OOb /OO 


AflAAfld 
UUUUUU 




986 


005702 


00 0776 




987 


00b / Oh 




001 304 


988 


00571 2 


A A 1 AO A 
UU I U.4U 




989 


0057 1 4 


A A f\1A 1 




990 


005716 




001 304 


991 




1 05537 


001 304 


992 


005726 


062737 


000024 


993 


05734 


022737 


001 740 


994 




AA 1 "3RA 
UU I JOU 




995 


005744 




001 500 


996 


005752 


AA f\"7KA 
UU U / OH 




997 


005754 


A A AOZ1 1 
UU Ufd H 1 




998 


005756 


1061 37 


001 304 


999 


005762 




001 304 


1 000 


OOb /Do 


A 1 "3 V A A 
U i O / w U 


001 306 


1001 


005772 


06 2737 


000024 


1 002 


r\ r\ a n a a 
OObOOU 


02 2737 


001 740 


1 003 








1004 


OObOOb 


A A 1 A A'} 
U U 1 UUJ 




1 005 


UUOU 1 u 


1 2737 


001 500 


1 006 


OObO i b 


1 2037 


001 362 


1 007 




1 2037 


001 352 


1 008 


A Afi A *") £ 




001 41 6 


1009 


OObOo^ 


1 2037 


001426 


1010 


006036 


1 2037 


001 420 


1011 


U U to (J «4 d. 




001 430 


1012 


00b04b 


01 2037 


001422 


1013 


a a ^ a k o 




001 432 


1014 


OUbObb 


01 2037 


001 424 


1015 


AACACO 

OObOb*: 


01 2037 


001 434 


1016 


a a c: a ci A 
OObubb 


01 2 70 


000002 


1017 


u uou / <i 


01 3737 


001 362 


1018 


0061 00 


005237 


001 364 


1019 


0061 04 


01 3737 


001 364 


1 020 


006112 


005237 


001 366 




0061 16 


01 3737 


001 366 


1022 


0061 24 


060037 


001370 


1023 


006130 


013737 


001370 


1024 


0061 36 


060037 


001372 


1025 


006142 


01 3737 


001372 


1026 


006150 


005237 


001374 


1027 


006154 


013737 


001374 


1028 


006162 


005237 


001376 
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GENERAL UTILITIES (TYPE OUT , ERROR , SCOPE , ETC . ) 



ROUTINE USED TO "CYCLE" THROUGH UP TO EIGHT DV11'S 

THIS ROUTINE SETS UP THE CONTROL ADDRESS FOR THE DIAGNOSTIC 

AND RUNS THE SPECIFIED DV11'S. THIS ROUTINE *MUST* 

BE RUN FIRST BEFORE ENTERING THE DIAGNOSTIC FOR THE 

SETUP NECESSARY. 



SEQ 0032 



TSTB 

BNE 

TYPE 

HALT 

BR 

BITB 
BNE 
CLC 
RCLB 
ADCB 
ADD 
CMP 
BNE 
MOV 
. BR 
CLC 
RO LB 
ADCB 
MOV 
ADD 
CMP 

BNE 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
INC 
MOV 
INC 
MOV 
ADD 
MOV 
ADD 
MOV 
INC 
MOV 
INC 



DVACTV 
1$ 

,MERR2 
.-2 

RUN, DVACTV 
2$ 

RUN 
RUN 

#24 , CREAM 
#DV. END, CREAM 
1$ 

#DV. MAP, CREAM 
1$ 

RUN 
RUN 

CREAM, RO 
#24, CREAM 
#DV. END, CREAM 

3$ 

#DV .MAP .CREAM 

(RO)+,DVSCR 

(R0)+,DVRVEC 

(R0)+,L00.03 

(R0)+,SYNC2A 

(R0)+, L04.07 

(R0)+,SYNC2B 

(R0)+,L08.11 

(R0)+,SYNC2C 

(R0)+,L12.15 

(R0)+,SYNC2D 

#2,R0 

DVSCR.DVSCRH 
DVSCRH 

DVSCRH.DVRIC 
DVRIC 

DVRICDVLCR 

RO.DVLCR 

DVLCR.DVSRS 

RO.DVSRS 

DVSRS, DVSRSH 

DVSRSH 

DVSRSH, DVSR A 
DVSRA 



ARE ANY DV11'S TO BE TESTED? 
BR IF OK. 

NO DV11 "S SELECTED! ! 
STOP THE SHOW. 
DISQUALIFY CONT. SW. 
IS THIS ONE "ACTIVE" 
BR IF GOOD ONE FOUND. 
CLEAR PROC. CARRY BIT. 
UPDATE POINTER 
CATCH CARRY FROM RUN 
UPDATE ADDRESS POINTER. 

KEEP GOING; NOT ALL TESTED FOR . 

RESET ADDRESS POINTER. 

KEEP LOOKING FOR ACTIVE DV11 

CLEAR PROC. CARRY. 

UPDATE POINTER. 

CATCH CARRY. 

GET ADDRESS POINTER. 

UPDATE. 

ALL DONE? 
BR IF NO. 

RESTORE POINTER. - 
LOAD SYSTEM CTRL. REG 
LOAD VECTOR 

GET LINE PARAMETERS. 00-03 
04-07 
08-11 
12-15 

SAVE CORE THIS WAY! 

GET SYS CTRL. REG HIGH BYTE. 

GOT IT. 

GET NXT REC. CHAR REG. 
GOT IT 

GET LN. PAR . REG. 

GOT IT 

GET SEC. REG. SEL. REG. 
GOT IT 

GET HIGH BYTE. 
GOT IT 

SEC. REG. ACCESS. 
GOT IT 
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GENERAL UTILITIES (TYPE OUT , ERROR , SCOPE, ETC . ) 



SEQ 0033 



1029 


006166 


01 3737 


001376 


001400 




MOV 


DVSRA, DVSFR 


;SPEC. FUN; REG. 


1030 


0061 74 


060037 


001400 






ADD 


RO, DVSFR 




1031 


006200 


01 3737 


001400 


001402 




MOV 


DVSFR, DVNSR 


; NPR STAT. REG. 


1032 


006206 


0600:7 


001402 






ADD 


RO, DVNSR 




1033 


006212 


01 3737 


001402 


001404 




MOV 


DVNSR, RESV16 


; RESERVED REG 


1034 


006220 


060037 


001404 






ADD 


RO , RESV1 6 




1035 


















1036 


006224 


01 3737 


001352 


001354 




MOV 


DVRVEC , DVRLVL 


;PTY LVL 


1037 


006232 


060037 


001354 






ADD 


RO.DVRLVL 




1038 


006236 


01 3737 


001354 


001356 




MOV 


DVRLVL, DVTVEC 


;TX VEC 


1039 


006244 


0<:0037 


001356 






ADD 


RO.DVTVEC 




1040 


006250 


01 3737 


001356 


001360 




MOV 


DVTVEC, DVTLVL 


;TX LVL 


1041 


006256 


060037 


001360 






ADD 


RO, DVT LVL 




1042 


















1043 


006262 


012700 


001416 






MOV 


#L00.03,R0 


; LOAD STAUS 00-03 


1044 


006266 


01 2701 


001406 






MOV 


#MASK.A,R1 


; PREPARE MASK. 


1045 


006272 


01 2702 


001412 






MOV 


#CLK.A,R2 


; PREPARE CLOCKS 


1046 


006276 ' 


004737 


006516 






JSR 


PC, FIX. 00 


;G0 AND CALCULATE 


1047 


















1048 


006302 


01 2700 


001420 






MOV 


#L04.07,R0 


; LOAD STAUS 00-03 


1049 


006306 


01 2701 


001407 






MOV 


#MASK.B,R1 


; PREPARE MASK. 


1050 


006312 


012702 


001413 






MOV 


#CLK.B,R2 


; PREPARE CLOCKS 


1051 


006316 


004737 


006516 






JSR 


PC.FIXiOO 


;G0 AND CALCULATE 


1052 


















1053 


006322 


012700 


001422 






MOV 


#L08. 1 1 ,R0 


; LOAD STAUS 00-03 


1054 


006326 


012701 


001410 






MOV 


#MASK.C,R1 


; PREPARE MASK. 


1055 


006332 


012702 


001414 






MOV 


#CLK.C,R2 


; PREPARE CLOCKS 


1 056 


006336 


004737 


006516 






JSR « 


PC, FIX. 00 


;G0 AND CALCULATE 


1057 


















1058 


006342 


01 2700 


001424 






MOV 


#L12.15.R0 


; LOAD STAUS 00-03 


1059 


006346 


01 2701 


001411 






MOV 


#MASK.D,R1 


; PREPARE MASK. 


1060 


006352 


01 2702 


001415 






MOV 


#CLK.D,R2 


; PREPARE CLOCKS 


1061 


006356 


004737 


006516 






USR 


PC, FIX. 00 


;G0 AND CALCULATE 


1062 


006362 


032777 


000002 


172612 




BIT 


#SW01 ,@SWR 




1063 


006370 


001445 








BEQ 


7$ 




1064 


006372 








4$: . 








1065 


006372 


005737 


000042 






TST 






1066 


006376 


001042 








BNE 


7$ 




1067 


006400 


104402 


005104 






TYPE 


,MCRLF 




1 068 


006404 


1 04403 








INSTR 






1069 


006406 


005366 








MTSTN 






1070 


006410 


104405 








PARAM 






1071 


006412 


00 0001 








1 






1072 


006414 


001000 








1000 






1073. 


006416 


001226 








TSTNO 






1074 


006420 


000 






• BYTE 









1075 


006421 


001 






. BYTE 


1 






1076 


006422 


012700 


007256 






MOV 


#TST1,R0 




1 077 


006426 


022710 






5$: 


CMP , 


(PC)+,(R0) 




1078 


006430 


012737 








MOV 


(PC)+,@(PC)+ 




1079 


006432 


001015 








BNE 


6$ 




1080 


006434 


023760 


001226 


000002 




CMP 


TSTNO, 2 (RO) 




1081 


006442 


00101 1 








BNE 


6$ 




1082 


006444 


022760 


001226 


000004 




CMP 


#TSTN0,4(R0) 




1083 


006452 


001005 








BNE 


6$ 




1084 


006454 


010037 


001214 






MOV 


RO, RETURN 
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1085 

1086 

1087 

1088 

1089 

1090 

1091 

1092 

1093 

1094 

1095 

1096 

1097 

1098 

1099 

1100 

1101 

1102 

1103 

1104 

1 105 

1106 

1107 

1108 

1109 

1110 

1111 

1112 

111* 

1114 

1115 

1116 

1117' 

1118 

1119 

1120 

1121 

1122 

1123 

1124 

1125 

1126 

1127 

1128 

1129 

1130 

1131 

1132 

1133 

1134 

1135 

1136 

1137 

1138 

1139 

1140 



006460 


104402 


005104 


006464 


000412 




006466 


005720 




006470 


020027 


021152 


006474 


001354 




006476 


104402 


005100 


006502 


000733 




006504 


012737 


007256 


006512 


000177 


172476 


006516 


01 1003 




006520 


042703 


176377 


006524 


005703 




006526 


001004 




006530 


10501 1 




006532 


112712 


000010 


006536 


000424 




006540 


022703 


000400 


006544 


001005 




006546 


1 1 271 1 


000200 


006552 


112712 


000007 


006556 


000414 




006560 


022703 


001000 


006564 


001005 




006566 


112711 


000300 


006572 


112712 


000006 


006576 


000404 




006600 


112711 


000340 


006604 


112712 


000005 


006610 


032710 


040000 


006614 


001401 




006616 


105212 




006620 


000207 
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GENERAL. UTILITIES (TYPE OUT , ERROR , SCOPE , ETC . ) 



6$: 



SEQ 0034 



7$: 
8$: 



2$: 



5$: 



TYPE 


f MCRLF 


BR 


8$ 


TST 


(R0) + 


CMP 


R0,mAST+10 


, BNE 


5$ 


TYPE ' 


' ,MQM 


BR 


4$ 


MOV 


#TST1 i RETURN 


JMP 


9RETURN 


.00: MOV 


(R0) f R3 


BIC 


#*C<1400>.R3 


TST 


R3 


BNE 


1$ 


CLRB 


(RD 


MOVB 


#8. ,(R2) 


BR ' 


4$ 


CMP 


#400, R3 


BNE 


2$ 


MOVB 


#200, (R1) 


MOVB 


#7,(R2) 


BR 


4$ 


CMP 


#1000,R3 


BNE 


3$ 


MOVB 


#300, (R1) 


MOVB 


#6,(R2) 


BR 


4$ 


MOVB 


#340, (R1) 


MOVB 


#5,(R2) 


BIT 


#PARBIT,(RO) 


BEQ 


5$ 


INCB 


(R2) 


RTS 


PC 



; PREPARE RETURN ADDRESS 
{GO START TESTING. 

;QET PARAMETERS. 

{CLEAR JUNK. 

{TEST FOR EIGHT BITS. 

; BR IF NOT 8 BUS. 

{SET 



{CHECK FOR SEVEN BITS. 
{BR IF NOT 7 BITS. 



{CHECK FOR SIX BITS. 
; BR IF NOT SIX BITS. 



;IF NONE OF THE ABOVE; MUST BE 5 BITS. 

{PARITY ENABLED? 

{IF ■0{ THEN NO PARITY. 

{PLUS ONE TO THE CLOCKl 



{♦ROUTINE USED TO "AUTO SIZE" THE DV1 1 
5*CSR AND VECTOR. 

}*NOTEJ THE CSR MAY BE ANY WHERE IN THE FLOATING 
;* ' ADDRESS RANGE (175000:175400) 
5* AND THE VECTOR MAY BE ANY WHERE IN THE 

!* FLOATING, VECTOR RANGE (300:770), 



006622 








AUTO. SIZE: 








006622 


000005 








RESET 






{ INSURE A BUS INIT. 


006624 


012702 


001500 




CSRMAP: 


MOV 


#DV.MAP 


R2 


{LOAD MAP POINTER. 


006630 


005022 






1$: 


CLR 


(R2) + 




{ZERO ENTIRE MAP 


006632 


022702 


001740 






CMP 


#DV.END 


R2 


{ALL DONE? 


006636 


001374 








BNE 


1$ 




; BR IF NO 


006640 


105037 


001301 






CLRB 


DVNUM 




{SET OCTAL NUMBER OF DV1 1 1 S TO 


006644 


012702 


001500 






MOV 


#DV.MAP 


R2 


{SET FOR FIRST ADDRESS TO BE TESTED 


006650 


0<2701 


175000 






MOV 


#175000 


R1 


006654 


012737 


007074 


000004 




MOV 


#6$,©#4 




{SET FOR NON-EXISTANT DEVICE TIME OUT 


006662 


00571 1 






2$: 


TST 


(R1) 




{IF DV11 DVSCR S/B 


006664 


001037 








BNE 


3$ 




{IF NO DEV ; TRAP TO 4. IF NO BIT 8 THEN NO DV11 


006666 


022761 


177777 


000012 




CMP 


#177777 


12(R1) 


;IF DV11 THEN DVSFR S/B ALL 1'S ON INIT! 


006674 


001033 








BNE 


3$ 




; BR IF NOT DV11 
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GENERAL UTILITIES (TYPE OUT, ERROR, SCOPE, ETC. ) 



SEQ 0035 



1141 


006676 


005761 


000016 






TST 


1 142 


006702 


001030 








BNE 


1 143 










{AT THIS POINT 


1144 


006704 


01 0122 








MOV 


1145 


006706 


005722 








TST 


1 146 


•006710 


052722 


000226 






BIS 


1147 


006714 


052722 


000062 






BIS 


,1 148 


006720 


052722 


000226 






BIS 


1149 


006724 


052722 


000062 






BIS 


1 150 


006730 


052722 


000226 






BIS 


1 151 


006734 


052722 


000062 






BIS 


1 152 


006740 


052722 


000226 






BIS 


1 153 


006744 


052722 


000062 






BIS 


1 154 


006750 


105237 


001301 






INCB 


1 155 


006754 


122737 


000010 


001301 




CMPB 


1156 


006762 


001405 








BEQ 


1157 


006764 


062701 


000010 




3$: 


ADD 


1158 


006770 


022701 


175400 






CMP 


1159 


006774 


001332 








BNE 


1160 


006776 


012722 


177777 




100$5 


MOV 


1 161 


007002 


105037 


001300 






CLRB 


1 162 


007006 


105737 


001301 






TSTB 


1 163 


007012 


001423 








BEQ 


1 164 


007014 


1137U1 


001301 






MOVB 


1165 


007020 


110137 


001303 






MOVB 


1166 


007024 


000241 






4): 


CLC 


1 167 


007026 


106137 


001300 






ROLB 


1 168 


007032 


105237 


001300 






INCB 


1 169 


007036 


005301 








DEC ■ 


1 170 


007040 


001371 








BNE 


1 171 


007042 


0:2737 


000006 


000004 




MOV 


1172 


007050 


113737 


001300 


001302 




MOVB 


1 173 


007056 


000137 


007102 






JMP 


1 174 


007062 


104402 


005174 




5$: 


TYPE 


1 175 


007066 


005000 








CLR 


1 176 


007070 


000000 








HALT 


1177 


007072 


000776 








BR 


1 178 


007074 


012716 


008764 




6$: 


MOV 


1179 


007100 


000002 








RTI 


1180 














1181 


007102 


012737 


000340 


000022 


VECMAPS 


MOV 


1182 


007110 


012737 


007232 


000020 




MOV 


1 183 


007118 


012702 


001500 






MOV 


1184 


007122 


012700 


000300 






MOV 


1 185 


007126 


012701 


000302 






MOV 


1188 


007132 


010120 






1$! 


MOV 


1187 


007134 


012721 


000004 






MOV 


1188 


007140 


022021 








CMP 


1189 


007142 


020127 


001000 






CMP 


1190 


007146 


101771 








BLOS 


1 191 


007150 


113737 


001300 


001246 




MOVB 


1192 


007156 


006037 


001246 




2$: 


ROR 


1 193 


007162 


103034 








BCC 


1 194 


007164 


005037 


177776 






CLR 


1195 


007170 


012772 


001300 


000000 




MOV 


1196 


007176 


005000 








CLR 



16(R1) 
3$ 

IT IS ASSUMED THAT 
R1 ,(R2) + 
(R2) + 

#226, (R5)+ 
#62,(R2)+ 
#226, (R2)+ 
#62,(R2)+ 
#228, (R2)+ 
#62,(R2)+ 
#226,(R2)+ 
#62, (R2)+ 
DVNUM 
#10, DVNUM 
100$ 
#10, R1 
#175400, R1 
2$ 

#177777, (R2)+ 
DVACTV 
DVNUM 
5$ 

DVNUM, R1 
R1 .SAVNUM 

DVACTV 
DVACTV 
R1 
4$ 

#6,9>#4 

DVACTV, SAVACT 
VECMAP 
,MERR2 
RO 



IF DV11 THEN RESV16 S/B ALL O'S 
BR IF NOT DV11 

R1 HOLDS A DV11 CSR ADDRESS. 
STORE CSR IN CORE TABLE. 
POP OVER VECTOR STORE AREA 
SET LINE CARD 1 STAT AND SYNC 

SET LINE CARD 2 STAT AND SYNC 

SET LINE CARD 3 STAT AND SYNC 

SET LINE CARD 4 STAT AND SYNC 

UPDATE DEVICE COUNTER 
ARE MAX. NO. OF DEV FOUND? 
YES DON'T LOOK FOR ANY MORE. 
UPDATE CSR POINTER ADDRESS 

BR IF MORE ADDRESS TO CHECK. 
TERMINATER. 

WERE ANY DVII'S FOUND AT ALL? 
ERROR AUTO SIZER FOUND NO- DV1 1 'S IN THIS SYS. 



SAVE NUMBER OF DEVICES 



GENERATE ACTIVE REGISTER OF DEVICES. 
SET THE BIT 



.-2 

#3$,(SP)' 



#340,*#22 
#4$,9#20 
#DV.MAP,R2 
#300, RO 
#302, R1 
R1,(R0)+ 
#4,(R1)+ 
(R0)+,(R1 )+ 
R1 ,#1000 
1$ 

DVACTV, TEMPI 

TEMPI 

5$ 

PS 

#BIT9+BIT7+BIT8 

RO 



BR IF MORE TO GENERATE 
RESTORE TRAP VECTOR 
{SAVE ACTIVE REGISTER 
{GO FIND THE VECTOR NOW. 
{NOTIFY OPR THAT NO DV11'S FOUND. 
{MAKE DATA LIGHTS ZERO 
{STOP THE SHOW 
; DISABLE CONT. SW. 
{ ENTERED BY NON-EXISTANT TIME-OUT. 
{ RETURN TO MAINSTREAM 

{ SET IOT TRAP PRIO TO 7 

{SET IOT TRAP VECTOR 

{SET SOFTWARE POINTER 

• FLOATING VECTORS START HERE. 

{PC OF IOT INSTR. 

{START FILLING VECTOR AREA 

5 WITH .+2} IOT 

{ADD 2 TO RO +R1 

;BR IF MORE TO FILL 
{STORE TEMPORALLY 
{BRING OUT A BIT 
;BR IF ALL DONE 
{ZERO CPU PRIO 
0(R2) 

{ATTEMPT TO FORCE AN INTERUPT 



CZDVDCO 


MACY1 1 


30A(1052) 


10-FE 


C2DVDC . 


P11 02-FEB-78 


13:55 


1197 


007200 


005200 




1 198 


007202 


001376 




1 1 99 


007204 


052762 


000300 


1200 


00721 2 


0427: 2 


176777 


1201 


007220 


005072 


000000 


1202 


007224 


062702 


000024 


1203 


007230 


000752 




'1204 


007232 


051662 


000002 


1205 


007236 


042762 


000007 


1206 


007244 


022626 




1207 


007246 


0' 2716 


007212 


1208 


007252 


000002 




1209 


007254 


000207 




1210 









15:44 PAGE 25 

GENERAL UTILITIES (TYPE OUT , ERROR , SCOPE , ETC . ) 



000002 
000000 



INC 


RO 


BNE 


.-2 


BIS 


#300,2(R2) 


BIC 


jrC<BIT9>.@(R2) 


CLR 


@(R2) 


ADD 


#24, R2 


BR 


2$ 


BIS 


(SP) ,2(R2) 


BIC 


#7,2(R2) 


CMP 


(SP)+, (SP)+ 


MOV 


#3$,(SP) 


RTI 




RTS 


PC 



STALL 

FOR TIME TO INTERUPT 
NO INTERUPT ASSUME 300 AND FIX DV1 1 



;POP SOFTWARE POINTER 
; KEEP GOING 
; GET VECTOR ADDRESS 
; CLEAR JUNK 

;POP IOT JUNK OFF STACK 
;SET FOR RETURN 

; ALL DONE WITH "AUTO SIZING" 
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DV11 DEVICE DIAGNOSTICS, 



COPYRIGHT 1975 DIGITAL EQUIP. CORP. 



121 1 










1212 










1213 










1214 










1215 










1216 










1217 










1 218 










1219 










1220 


007256 


012737 


000001 


001226 


1221 


007264 


01 2737 


007664 


001216 


1222 


007272 


01 2700 


000000 




1223 


007276 


01 3737 


001416 


001236 


1224 


007304 


100402 






1225 


007306 


004737 


007374 




1226 


007312 


01 2700 


000004 




1227 


007316 


01 3737 


001420 


001236 


1228 


007324 


100402 






1229 


007326 


004737 


007374 




1230 


007332 


01 2700 


000010 




1231 


007336 


01 3737 


001422 


001236 


1232 


007344 


100402 






1233 


007346 


004737 


007374 




1234 


007352 


01 2700 


000014 




1235 


007356 


01 3737 


001424 


001236 


1236 


007364 


100402 






1237 


007366 


004737 


007374 




1238 


007372 


104400 






1239 


007374 








1240 


007374 


012737 


007422 


001220 


1241 


007402 


104413 






1242 


007404 


005003 






1243 


007406 


005001 






1244 


007410 


112737 


000025 


022560 


1245 


007416 


01 2702 


000004 




1246 


007422 


11 0137 


023605 




1247 


007426 


01 0077 


171740 




1248 


007432 


004537 


022120 




1249 


007436 


000 


001 




1250 


007440 


022560 






1251 


007442 


177777 






1252 


007444 


004537 


022120 




1253 


007450 


013 


010 




1254 


007452 


GOQ004 






1255 


007454 


023560 






1256 


007456 


004537 


022120 




1257 


007462 


014 


014 




1258 


007464 


000000 






1259 


007466 


000000 






1260 


007470 


032737 


004000 


001236 


1261 


007476 


0CM407 






1262 


007500 


004537 


022164 




1263 


007504 


01 5000 






1264 


007506 


004537 


022164 




1265 


007512 


072000 






1266 











************************ jest 1 ****************************** 
♦TEST OF TRANSMITTER CONTROL BYTES. 
♦TEST OF "NEXT MODE" FOR TRANSMITTER. 

♦THIS TEST IS DONE FOR BOTH ASYNC AND SYNC LINE CARDS. 
:**************************************************************** 



103$: 
105$: 



#1 ,TSTNO 

#TST2,NEXT 

#0.,R0 

LOO. 03, STAT 

100$ 

PC, 105$ 

#4.,R0 

L04.07.STAT 

101$ 

PC, 105$ 

#8.,R0 

L08.11 , STAT 

102$ 

PC, 105$ ' 
#12. ,R0 
L12.15.STAT 
103$ 
PC, 1 05$ 



MOV 
MOV 
MOV 
MOV 
BMI 
JSR 
MOV 
MOV 
BMI 
JSR 
MOV 
MOV 
BMI 
JSR 
MOV 
MOV 
BMI 
JSR 
SCOPE 

MOV 
RAMCLR 
CLR 
CLR 
MOVB 
MOV < 
MOVB 
MOV 

PERFORM .SETREG 
•BYTE 000,001 
TXBAP 
-1 

PERFORM , SETREG 
.BYTE Q13.01Q 
BIT2 
TXTAB 

PERFORM .SETREG 
.BYTE 014,014 



BIT # ASYNC, STAT 

BED 60$ 
PERFORM .LOAD. MODE 
<BIT12+BIT11>+BIT9 
PERFORM .LOAD. MODE 
<BIT14+BIT13+BIT12>+BIT1 



#1$,L0CK 

R3 
R1 

#25, TXBAP 
#4,R2 

R1 .TXTAB+25 
RO.0DVSRS 



PLACE LIME NUMBER INTO RO 

LOAD LINE CARD STATUS INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

GO DO THE TEST FOR LINE CARD 1 

PLACE LINE NUMBER INTO RO 

LOAD LINE CARD STATUS INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

GO DO THE TEST FOR LINE CARD 2 

LOAD LINE NUMBER 

LOAD LINE CARD STATUS INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

DO THE TEST FOR LINE CARD 3 

LOAD LINE NO. 

LOAD LINE CARD STATUS 

BR IF LINE CARD NOT TO BE TESTED 

DO THE TESTS FOR LINE CARD 4 

SCOPE THIS TEST. 

TEST ENTRANCE. 

SET IF SW09=1 (LOCK) 

CLEAR ALL SEC REGISTERS 

SET IMAGE EXPECTED MODE=0 

SET IMAGE "NEXT MODE"=0 

SET TX DATA CHAR 

SET FOR 4 LINE GROUP 

LOAD CONTROL BYTE(MODE) 

LOAD LINE NUMBER 

TX PRINCIPLE BA, PRINCIPLE BC 



UNE STATE, 
TXGO 



CNTRL TABLE 



TX MODE REG 

MAKE 

IT=0 

#IS THIS ASYNC LINE CARD? 

#BR IF NO. 

# 

#8 BITS/PER/CHAR 



#9600 BAUD. 
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DV11 DEVICE DIAGNOSTICS. 



COPYRIGHT 1975 DIGITAL EQUIP. CORP. 



SEQ 0038 



1267 
1268 
1269 
1270 
1271 
1272 
,1273 
1274 
1275 
1276 
1277 
1278 
1279 
1280 
1281 
1282 
1283 
1284 
1285 
1266 
1287 
1288 
1289 
1290 
1291 
1292 
1293 
1294 
12-95 
1296 
1297 
1298 
1299 
1300 
1301 
1302 
1303 
1304 
1305 
1306 
1307 
1308 
1309 
1310 
1311 
1312 
1313 
1314 
1315 
1316 
1317 
1318 
1319 
1320 
1321 
1322 



007514 
007516 
007522 
007524 
007532 
007540 
007546 
007554 
007556 
007560 
007564 
007566 
007570 
007572 
007574 
007602 
007606 
007610 
007616 
007622 
007624 
007626 
007630 
007632 
007634 
007636 
007640 
007644 
007646 
007650 
007652 
007654 
007656 
007660 
007662 



000403 
004537 
014000 
012737 
012777 
012777 
052777 
005005 
104414 
005037 
0C5205 
001373 
104000 
024646 
042777 
005037 
022626 
1 12777 
017704 
010305 
020504 
001401 
104003 
1044)2 
104401 
005203 
062701 
105701 
001665 
005001 
0i5003 
005200 
005302 
001260 
000207 



007664 
007672 
007700 
007704 
007712 
007720 
007722 
007726 
007732 



01 2737 
012737 
012700 
113737 
013737 
100402 
004737 
01 2700 
113737 



022164 

000340 
007574 
000340 
020001 



020000 
177776 



000014 
171554 



60$: 



177776 
171616 
171612 
171606 



171560 3$* 



171556 



4$: 



PERFORM 

BIT12+BI 

MOV 

MOV 

MOV 

BIS 

CLR 

DELAY 

CLR 

INC 

BNE 

HLT 

CMP 

BIC 

CLR 

CMP 

MOVB 

MOV 

MOV 

CMP 

BEQ 

HLT 

MSTCLR 

SC0P1 

INC 

ADD 

TSTB 

BEQ 

CLR 

CLR 

INC 

DEC 

BNE 

RTS 



61$ 

, LOAD. MODE 
T11 

#340, PS 
#3$,0DVTVEC 
#34O,0DVTLVL 
#BIT13+BITO,0DVSCR 



5 LOAD 
{MODE 

} LOCK OUT INTERUPTS 
;SET TRANS VECTOR 
{LOAD PRIO. 



R5 

PS 
R5 
2$ 

-(SP).-(SP) 

#BIT13,QDVSCR 

PS 

(SP)+,(SP)+ 

#14,®DVSRSH 

QDVSRA.R4 

R3.R5 

R5.R4 

4$ 

3 



R3 

#BIT5,R1 

R1 

1$ 

R1 

R3 

RO 

R2 

1$ 

PC 



;SET STATUS IE AND UCPU GO. 



{WAIT 
; STALL FOR TIME 
; ALLOW ITERUPTS (NSR ENTRY) 
; ENTRY 

•NO SILO ENTRY (DVSCR 15 N0T«1 ) 

; FAKE INTERUPT, BECAUSE NO REAL ONE HAPPENED. 

;CLR IE 

;2ER0 PSW 

; FAKE AN RTI 

;SEL TX MODE REGISTER 

{ READ MODE REG. 

;SET EXPECTED 

{WAS "NEXT MODE" LOADED CORRECTLY? 
; BR IF YES 

;TX MODE REGISTER WRONG 
;INIT DV11 

{LOCK ON MODE, LOCK ON LINE? 
{UPDATE EXPECTED MODE 
{UPDATE CNTRL BYTE IMAGE 
{ALL DONE?? 
; BR IF NO 

{ZERO EXPECTE MODE 
{ZERO CNTRL BYTE MODE 
{UPDATE LINE NO POINTER 
{4 LINES DONE 
{BR IF YES 

{EXIT FOR NEXT GROUP OF LINES 



************************* TEST 2 ****************************** 

{♦TEST OF TRANSMITTER IDLE FUNCTIONS. 
;*TEST THAT THE TRANSMITTER WILL IDLE 
}*SYNC (IDLE) CHARS WHEN BIT OF 
;*DLE/PROTOCOL REGISTER IS CLEARED. 
;*THIS TEST IS DONE FOR SYNC LINE CARDS ONLY. 

. ****************************** *********************************** 



{ TEST 2 



000002 
010430 
000000 
001406 
001416 

010032 
000004 
001407 



001226 


TST2: 


MOV 


02.TSTNO 


001216 




MOV 


#TST3,NEXT 






MOV 


#0. ,R0 


001244 




MOVB 


MASK. A ,MASKX 


001236 




MOV 


LOO. 03, STAT 






BMI 


100$ 






USR 


PC ,105$ 




100$: 


MOV 


#4. ,R0 


001244 




MOVB 


MASK. B,MASKX 



{PLACE LINE NUMBER INTO RO 
{PLACE "MASK" FOR CHARS INTO MASKX 
{LOAD LINE CARD STATUS INTO STAT 
; BR IF LINE CARD NOT TO BE TESTED 
{GO DO THE TEST FOR LINE CARD 1 
{PLACE LINE NUMBER INTO RO 
{GET MASK 
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DV11 DEVICE DIAGNOSTICS. 



COPYRIGHT 1975 DIGITAL EQUIP. CORP. 



SEQ 0039 



1323 


007740 


013737 


001420 


001236 




MOV 


L04.07.STAT 


{ LOAD LINE CARD STATUS INTO STAT 


1324 


007746 


100402 








BMI 


101$ 


;BR IF LINE CARD NOT TO BE TESTED 


1325 


007750 


004737 


010032 






JSR 


PC, 105$ 


{GO DO THE TEST FOR LINE CARD 2 


1326 


007754 


012700 


000010 




101$: 


MOV 


#8. ,R0 


; LOAD LINE NUMBER 


1327 


007760 


113737 


001410 


001244 




MOVB 


MASK. C, MASKX 


{GET MASK 


1328 


007766 


01 3737 


001422 


001236 




MOV 


L08. 1 1 , STAT 


; LOAD LINE CARD STATUS INTO STAT 


1329 


007774 


100402 








BMI 


102$ 


;BR IF LINE CARD NOT TO BE TESTED 


1330 


007776 


004737 


010032 






JSfJ 


PC, 105$ 


;D0 THE TEST FOR LINE CARD 3 


1331 


010002 


012700 


000014 




102$: 


MOV 


#12. ,R0 


{ LOAD LINE NO. 


1332 


010006 


1 1 3737 


001411 


001244 




MOVB 


MASK. D, MASKX 


{GET MASKK 


1333 


0100,14 


0* 3737 


001424 


001236 




MOV 


L12.15.STAT 


{ LOAD LINE CARD STATUS 


1334 


010022 


100402 








BMI 


103$ 


; BR IF LINE CARD NOT TO BE TESTED 


1335 


010024 


004737 


010032 






JSR 


PC, 105$ 


{DO THE TESTS FOR LINE CARD 4 


1336 


010030 


104400 






103$: 


SCOPE 




{ SCOPE THIS TEST. 


1337 


010032 








105$: 






{TEST ENTRANCE. 


1338 


010032 


032737 


004000 


001236 




BIT 


#ASYNC,STAT 


;#IS THIS AN ASYNC LINE CARD? 


1339 


010040 


001401 








BEQ 


.+4 


;#BR IF NOT ASYNC . 


1340 


010042 ' 


000207 








RTS 


PC 


;#EXIT TEST. (ASYNC LINE CARD NOT 


1341 


010044 


012737 


0101.16 


001220 




MOV 


#3$, LOCK 


{SET FOR RETURN IF SW09=1 


1342 


010052 


104413 








RAMCLR 




{CLEAR ALL SEC REGISTERS 


1343 


010054 


012705 


023560 






MOV 


jCTXTAB, R5 


{CLEAR 


1344 


010060 


012704 


030160 






MOV 


#RXTAB,R4 


; RECEIVER 


1345 


010064 


005001 








CLR 


R1 


; AND 


1346 


010066 


005025 






1$: 


CLR 


(R5) + 


{TRANSMITTER 


1347 


010070 


005024 








CLR 


(R4) + 


} CONTROL 


1348 


010072 


105201 








INCB 


R1 


; TABLES 


1349 


010074 


100374 








BPL 


1$ 




1350 


010076 


01 2737 


000001 


022560 




MOV 


#1 ,TXBAP 


{ LOAD TX 


1351 


010104 


1 1 2737 


000015 


022561 




MOVB 


#15,TXBAP+1 


; DTA 


1352 


0101 12 


01 2702 


000004 






MOV 


#4,R2 


; SET FOR 4 LINE GROUP 


1353 


0101 16 


01 0077 


171250 




3$: 


MOV . 


RO,fi>DVSRS 


; LOAD LINE NUMBER 


1354 


010122 


005037 


027560 






CLR 


RXBA 


{CLEAR 


1355 


010126 


00S037 


027562 






CLR 


RXBA+2 


; RECEIVER 


1356 


010132 


005037 


0275C4 






CLR 


RXBA+4 


; BUFFER 


1357 


010136 


032737 


004000 


001236 




BIT 


#ASYNC,STAT 


}#IS THIS AN ASYNC LINE CARD? 


1358 


010144 


001406 








BEQ 


80$ 


;*BR IF NOT ASYNC. 


1359 


010146 


004537 


022120 






PERFORM 


, SETREG 


{^ADJUST FOR ASYNC LINE CARD 


1360 


010152 


000 


001 






. BYTE 


000,001 


{^REGISTERS 


1361 


010154 


022560 








TXBA'P 




;#LOAD FOR ASYNC 


1362 


010156 


177776 








-2 




;#LOAD FOR A§YNC 


1363 


010160 


0Q0405 








BR 


81$ 


JICONTINUE TEST 


1364 


010162 


004537 


022120 




80$: 


PERFORM 


, SETREG 


1365 


010166 


000 


001 






. BYTE 


000,001 


{TX PRINCIPLE BA. PRINCIPLE BC 


1366 


010170 


022556 








SYNC 




1367, 


010172 


177774 








-4 




j 


136S 


010174 


004537 


022120 




81$: 


PERFORM 


, SETREG 




1369 


010200 


004 


005 






. BYTE 


004,005 


;RX BA, RX BC 


1370 


010202 


027560 








RXBA 






1371 


010204 


177772 








-6 , 






1372 


010206 


004537 


022120 






PERFORM 


, SETREG 




1373 


010212 


010 


011 






.BYTE 


010,011 


{TX TABLE, RXTABLE 


1374 


010214 


023560 








TXTAB 




1375 


010216 


030160 








RXTAB 




i 


1376 


010220 


004537 


022120 






PERFORM 


.SETREG 




1377 


010224 


013 


012 






. BYTE 


013,012 


{LINE STATE, LINE PROTOCOL 


1378 


010226 


000004 








BIT* 




{TX GOOD , • 
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1379 
1380 
1381 
1382 
1383 
1384 
13B5 
'1386 
1387 
1388 
1389 
1390 
1391 
1392 
1393 
1394 
1395 
1396 
1397 
1398 
1399 
1400 
1401 
1402 
1403 
1404 
1405 
1406 
1407 
1408 
1409 
1410 
1411 ' 
1412 
1413 
1414 
1415 
1416 
1417 
1418 
1419 
1420 
1421 
1422 
1423 
1424 
1425 
1426 
1427 
1428 
1429 
1430 
1431 
1432 
1433 
1434 



P1 


G2-FEB-78 


o 


0230 


000000 





0232 


032737 







001412 







004537 







f\o nn n ft 







004537 







n 1 Rnn n 
U 1 3UU u 





nolo 


ft ft A R "3 7 





0262 


ft"7 tftftft 





0264 


ftft ftAft K 







004537 







ft"} Aft ft ft 





0274 


004537 







00 5277 












i n 


1 0375 





nqi 


ftftKftftA 





0314 


1 2705 







1 1 3704 





n^94 


do fiRdd 







001401 





0330 


1 04001 







1 ] 2705 





n ^_ 6 









020504 





0344 


001 40 1 





n ,. g 


1 04001 





0350 







0350 


1 1 3705 





0354 


042705 












0364 


1 2703 





0370 


01 2701 





0374 


1121 04 







042704 





0402 


020504 





0404 


001401 





0406 


104001 





0410 


005303 





0412 


001370 





0414 


104412 





0416 


104401 





0420 


005200 





0422 


005302 





0424 


001234 





0426 


000207 
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SEQ 0040 



004000 001236 
022164 
022164 
022164 



021 70S 
171056 
171052 



000001 
027560 



000015 
027561 



001236 
177400 
001244 
000004 
027562 

177400 



60$: 
4$:. 



7$: 





BIT #ASYNC , STAT 

BEQ 60$ 
PERFORM , LOAD. MODE 
BIT13 

PERFORM , LOAD .MODE 
<BIT12+BIT11>+BIT9 
■PERFORM , LOAD. MODE 
<BIT14+BIT13+BIT12>+BIT1 



DEFAULT-IDLE SYNC 

#XS THIS ASYNC LINE CARD? 

#BR IF NO. 

# LOAD PARAMETERS. 

^RECEIVER ENABLE 

# 

#8 BITS/PER/CHAR 







#9600 BAUD. 


BR 


4$ 




PERFORM 


, LOAD. MODE 


LOAD 


BIT13+BIT12+BIT11 




PERFORM 


, SETSYNC 


opt cvmp ruin? Awn Arviim' 


INC 


@DVSCR 


^PT MTCRO rPII GO 


TSTB 


@DVSCR 


WAIT FOR 


BPL 


.-4 


DVSCR07 = 1 


CLR 


R4 




MOV 


#1 , R5 


SET EXPECTED 


MOVB 


RXBA.R4 


READ 1ST CHAR 


CMP 


R5 , R4 


OK? 


BEQ 


5$ 




HLT 


1 


1 ST CHAR S/8 = 1 1 


MOVB 


# 1 5 , R5 


SET EXPECTED 


MOVB 


RXBA+1 , R4 


GET 2ND CHAR 


CMP 


R5.R4 




BEQ 


6$ 




HLT 


1 


2ND CHAR S/B*15 


MOVB 


STAT , R5 


SET EXPECTED=SYNC CHAR 


BIC 


fTC<377>,R5 


CLEAR HIGH BYTE 


BICB 


MASKX, R5 


CLEAR BITS/PER/CHAR MASK 


MOV 


#4,R3 


SET TO LOOK AT 4 CHARS 


MOV 


#RXBA+2,R1 


GET RX DATA POINTER 


MOVB 


(R1 )+,R4 


GET FOUND DATA 


BIC 


*TC<377>,R4 


CLEAN HIGH BYTE 


CMP 


R5, R4 




BEQ 


8$ 




HLT 


1 


TRANSMITTER IDLED WRONG 


DEC 


R3- . 


4 CHARS CHECKED? • 


BNE ■ 


7$' ' 


BR. IF NO' . 


MSTCLR 




INIT DV11 


SCOP1 




LOCK ON LINE? 


INC 


RO 


UPDATE LINE POINTER 


DEC 


R2 


4 LINE GROUP DONE? 


BNE 


3$ 


BR IF NO 


RTS 


PC 


EXIT FOR NEXT GROUP 



>************************ TEST 3 *****************^*********** 

;*TEST OF TRANSMITTER IDLE FUNCTIONS. 

;*TEST THAT THE TRANSMITTER WILL IDLE 

;*MARK STATE (377) WHEN BITO IS 

;*SET IN THE DLE/PRCTOCOL REGISTER. 

;*THIS TEST IS DONE FOR SYNC LINE CARDS ONLY. 

>:**************************^ 
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SEQ 0041 



1435 
1436 
1437 
1438 
1439 
1440 
1441 
1442 
1443 
1444 
1445 
1446 
1447 
1448 
1449 
1450 
1451 
1452 
1453 
1454 
1455 
1456 
1457 
1458 
1459 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 
1470 
1471 
1472 
1473 
1474 
1475 
1476 
1477 
1478 
1479 
1480 
1481 
1482 
1483 
1484 
1485 
1486 
1487 
1488 
1489 
1490 



010430 
010436 
010444 
010450 
010456 
010464 
010466 
010472 
010476 
010504 
01 051 2 
010514 
010520 
010524 
010532 
010540 
01 0542 
010546 
010552 
010560 
010566 
010570 
010574 
01 0576 
010576 
010604 
010606 
010610 
010616 
010620 
010624 
010630 
010632 
010634 
010636 
010640 
010642 
010650 
010656 
010662 
01 0666 
010672 
010676 
010702 
010710 
010712 
010716 
010720 
010722 
010724 
010726 
010732 
010734 



01 2737 
012737 
012700 
1 1 3737 
01 3737 
100402 
004737 
01 2700 
1 1 3737 
013737 
1 00402 
004737 
01 2700 
113737 
01 3737 
100402 
004737 
01 2700 
1 1 3737 
01 3737 
100402 
004737 
104400 

032737 
001401 
000207 
2737 
104413 
01 2705 
01 2704 
005001 
005025 
005024 
105201 
100374 
01 2737 
1 1 2737 
01 2702 
01 0077 
005037 
005037 
005037 
032737 
001406 
004537 

000 
022560 
177776 
000405 
004537 

000 
022556 



001226 
001216 



001244 
001236 



001244 
001236 



001244 
001236 



001244 
001236 



000003 
01 1 174 
000000 
001406 
001416 

010576 
000004 
001407 
001420 

010576 
000010 
001410 
001422 

010576 
000014 
001411 
001424 

010576 



004000 001236 



010662 001220 



103$: 
105$: 



023560 
030160 



000001 
000015 
000004 
170504 
027560 
027562 
027564 
004000 

022120 
001 



022120 
001 



022560 
C22561 



MOV 
MOV 
MOV 
MOVB 
MOV 
BMI 
JSR 
MOV 
MOVB 
MOV 
BMI 
JSR . 
MOV 
MOVB 
MOV 
BMI 
dSR 
MOV 
MOVB 
MOV 
. BMI 
JSR 
SCOPE 

BIT 
BEQ 
RTS 
MOV 

RAMCLR 
MOV 
MOV 
CLR 
CLR 
CLR 
INCB 
BP L 
MOV 
MOVB 
. MOV 
MOV 
CLR 
CLR 
CLR 
BIT 
BEQ 

PERFORM 
.BYTE 
TXBAP 
-2 

BR 

PERFORM 

.BYTE 

SYNC 



#3,TSTN0 
#TST4,NEXT 
#0. f RO 

MASK . A , MASKX 
LOO. 03, STAT 
100$ 
PC, 105$ 
#4. ,R0 

MASK. B, MASKX 

L04.07.STAT 

101$ 

PC, 105$ 

#8.,R0 

MASK. C, MASKX 
L08.11 , STAT 
102$ 
PC, 105$ 
#12.,R0 
MASK. D», MASKX 
L1 2. 15, STAT 
103$ 
PC, 105$ 



#ASYNC,STAT 

.+4 

PC 

#3$, LOCK 

#TXTAB,R5 
#RXTAB,R4 
R1 

(R5) + 
(R4) + 
R1 
1$ 

#1 , TXBAP 

#15,TXBAP+1 

#4,R2 

RO,@DVSRS 

RXBA 

RXBA+2 

RXBA+4 

#ASYNC,STAT 

80$ 

,SETREG 
000,001 



81$ 

,SETREG 
000,001 



PLACE LINE NUMBER INTO RO 
PLACE "MASK" FOR CHARS INTO MASKX 
LOAD LINE CARD STATUS INTO- STAT 
BR IF LINE CARD NOT TO BE TESTED 
GO DO THE TEST FOR LINE CARD 1 
PLACE LINE NUMBER INTO RO 
GET MASK 

LOAD LINE CARD STATUS INTO STAT 
BR IF LINE CARD NOT TO BE TESTED 
GO DO THE TEST FOR LINE CARD 2 
LOAD LINE NUMBER 
GET MASK 

LOAD LINE CARD STATUS INTO STAT 
BR IF LINE CARD NOT TO BE TESTED 
DO THE TEST FOR LINE CARD 3 
LOAD LINE NO. 
GET MASKK 

LOAD LINE CARD STATUS 

BR IF LINE CARD NOT TO BE TESTED 

DO THE TESTS FOR LINE CARD 4 

SCOPE THIS TEST. 

TEST ENTRANCE. 

#IS THIS AN ASYNC LINE CARD? 
#BR IF NOT ASYNC . 

#EXIT TEST. (ASYNC LINE CARD NOT TESTED) 

SET FOR RETURN IF SW09=1 

CLEAR ALL SEC REGISTERS 

CLEAR 

RECEIVER 

AND 

TRANSMITTER 

CONTROL 

TABLES 

LOAD TX 
DTA 

SET FOR 4 LINE GROUP 

LOAD LINE NUMBER 

CLEAR 

RECEIVER 

BUFFER 

#IS THIS AN ASYNC LINE CARD? 

f/QR IF NOT ASYNC. 

#ADJUST FOR ASYNC LINE CARD 

^REGISTERS 

# LOAD FOR ASYNC 

#LOAD FOR ASYNC 

^CONTINUE TEST 

TX PRINCIPLE BA, PRINCIPLE BC 
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! 


01 0736 


1 7 777 A 






A 4 A •? A A 


00 4537 


0221 20 


! AQA 


Q i 07h** 




005 




? ! 2Zf « 


027560 




] 


010750 


1 7 77 / << 






A . A*7 C O 

1 0704 


^^o? 


022 1 20 


1 dQ7 






011 


1 498 


A 4 A *> fi A 

O 1 0760 


AA ICC A 




1 499 


A 4 A fi A 

1 0762 


A t A 4 ISA 

03 01 00 




1 Kft?> 


1 0764 




022 1 20 


i Rfti 


A 4 A T T A 


^(3?3 


012 


] 


010772 


ft ft ft ft ft A 




] 


01 0774 


ftft ftftft 1 
UU QUU 1 








032737 


ftft^ftftft 


i RftR 
1 1ns 


A 1 4 A A A 

l 1 001 


001412 




] 


011 006 


004537 


0221 64 






ft O A A ft A 




1 RftR 


011014 


ftftdRIJ? 

UU13J / 


0221 64 


1 RftQ 


011 020 


ai eftftft 
U I DUUU 




i Rio 

1 r! « 


011 022 


004537 


0221 64 




01 1 026 


ft7 Oftftft 




] |] * 








ill 2 


m 4 a »s a 
U 1 1 O JU 


AA A/l AC 
UU UtU9 






01 1032 


004537 


0221 64 


1515 




A O jfl A A A 




1516 


V 1 1 U*SW 


WwtwO f 


021 706 




A 4 4 f\AA 




1 7031 2 


! r! Q 


01 1050 


1 05777 


1 r UOWW 


1 1on 










01 1 056 


AA R AAA 

UU suut 




1 521 


A 4 4 AAA 

011 060 




ft ft ft ft ft 1 


1 522 


ft 1 1 ftfifl 


11 3704 








AA ARftA 




1 R94 

: 


011072 


ftft * An 4 

WW ltU 1 








4 A 4 Aft 1 
1 U*iUU1 




1 ROR 


ftl 1 A7fi 

ft! ! 




ftftftft 1 R 
UUWW 1 9 


1 R97 


ft! ! ! ar 


1 1 3704 


027561 


1 R9fl 


a ! ! ! i ft 


ftOftRftA 
U<( U3U*+ 




1 KOQ 


^! ! ! ! o 


001401 




i rto 


^ ! ! ! ! & 


1 ftdftft 1 
1 U*tUU 1 




i R-ii 


^! ! ! ! & 






i R'so 


«! ! ! in 


01 2705 


0ftft^77 

UU UO ( / 


1 533 


«! ! ! oa 


t\A <57ftR 


1 77400 


1 534 






001 244 




011130 


01 2703 


AftftftftA 


1536' 


01 1 1 34 


01 2701 


027562 


1537 


01 11 40 


112104 




1538 


01 1 142 


042704 


177400 


1539 


011146 


020504 




1540 


01 1 150 


001401 




1541 


011152 


104001 




1542 


011154 


005303 




1543 


01 1 156 


001370 




1544 


01 1 160 


104412 




1545 


011162 


104401 




1546 


011164 


005200 





, SETREG 
004,005 



60$: 
4$: 



5$: 



6$: 



PERFORM 
. BYTE 
RXBA 
-6 

PERFORM , SETREG 
. BYTE 010,011 
T) TAB 
RXTAB 

PERFORM , SETREG 



, BYTE 
BIT2 
BIT0 
BIT 
BEQ 



013,012 



#ASYNC , STAT 
60$ 

PERFORM , LOAD. MODE 
BIT13 

PERFORM , LOAD. MODE 
<BIT12+BIT11>+BIT9 
PERFORM , LOAD. MODE 
<BIT14+BIT13+BIT12>+BIT 



PERFORM 
BIT13+BI 
PERFORM 
INC 
, TSTB 
BPL 
CLR 
MOV 
M0VB 
CMP 
BE0 
HLT 
M0VB 
MOVB 
CMP 
BEQ 
HLT 

MOV 
BIC 
BICB 
MOV 
MOV 
MOVB 
BIC 
CMP . 
BEQ 
HLT 
DEC 
BNE 
MSTCLR 
SC0P1 
INC 



4$ 

, LOAD. MODE 

T12+BIT11 

.SETSYNC 

PDVSCR 

$DVSCR 

.-4 

R4 

#1 ,RB 
RXBA, R4 
R5,R4 
5$ 

1 

#15, R5 
RXBA+1 ,R4 
R5,R4 
6$ 

1 

#377, R5 

# A C<377>,R5 

MASKX.R5 

#4,R3 

#RXBA+2,R1 

(R1 )+,R4 

<rC<377>, R4 

R5.R4 

B$ 

1 

R3 
7$ 



RX BA, RX BC 



TX TABLE, RXTABLE 



LINE STATE, LINE PROTOCOL 
TX GOOD 

IDLE MARK ON BYTE CNT-0 

#XS THIS ASYNC LINE CARD? 

#BR IF NO. 

#L0AD PARAMETERS. 

^RECEIVER ENABLE 

t) 

#8 BITS/PER/CHAR 
# 

10 

; if 9600 BAUD. 
{ LOAD 

! MODE AND RX ENABLE 

;GET SYNC CHARS AND ADJUST FOR ONE OR TWO. 
; SET MICRO CPU GO 
iWAIT FOR 
{DVSCR07-1 

; SET EXPECTED 
{READ 1ST CHAR 
{OK? 
! 

1ST CHAR S/8-1 ! 

SET EXPECTED 

GET 2ND CHAR 



2ND CHAR S/B-15 

SET EXPECTED-MARK CHAR 

CLEAR HIGH BYTE 

CLEAR BITS/PER/CHAR MASK. 

SET TO LOOK AT 4 CHARS 

GET RX DATA POINTER 

GET FOUND DATA 

CLEAN HIGH BYTE 



TRANSMITTER IDLED WRONG 

4 CHARS CHECKED? 

BR IF NO 

INIT DV11 

LOCK ON LINE? 

UPDATE LINE POINTER 
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CZDVDC 


P11 


02-FEB-78 


13:55 


1547 


011166 


005302 




1548 


01 1 1 70 


001234 




1549 


011172 


000207 




1550 








1551 








1552 








1553 








1554 








1555 








1556 








1557 








1558 








1559 








1560 








1561 








1562 








1563 








1564 








1565 








1566 








1567 








1568 








1569 








1570 








1571 


011174 


012737 


000004 


1572 


01 1202 


012737 


012004 


1573 


011210 


012700 


000000 


1574 


011214 


113737 


001406 


1575 


01 1222 


01 3737 


001416 


1576 


011230 


100402 




1577 


011232 


004737 


01 1342 


1578 


011236 


012700 


000004 


1579 


01 1242 


113737 


001407 


15B0 


011250 


013737 


001420 


1581 


011256 


100402 




1582 


011260 


004737 


011342 


1583 


011264 


012700 


000010 


1584 


011270 


113737 


001410 


1585 


01 1276 


013737 


001422 


1586 


011304 


100402 




1587 


011306 


004737 


011342 


1583 


01 1312 


01 2700 


000014 


1589 


011316 


113737 


001411 


1590 


011324 


013717 


001424 


1591 


011332 


100402 




1592 


011334 


004737 


011342 


1593 


011340 


104400 




1594 


011342 






1595 


01 1342 


012737 


011442 


1596 


01 1350 


104413 




1 597 


011352 


105037 


023605 


1598 


011356 


1U5037 


023603 


1599 


011362 


105037 


023611 


1600 


01 1366 


105037 


023612 


1601 


011372 


105037 


024157 


1602 


011376 


012705 


022560 
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DEC R2 

BNE 3$ 
RTS PC 



COPYRIGHT 1975 DIGITAL EQUIP. CORP. 

;4 LINE GROUP DONE? 
; BR IF NO 

{EXIT FOR NEXT GROUP 



SEQ 0043 



************************* TEST 4 ****************************** 

♦TEST OF RECEIVER CONTROL BYTE OPERATIONS. 
♦TEST OF THE "STORE/OISCARD" FUNCTIONS. 

* TEST THAT CHARS: 

* 25 STORED 

* 23 DISCARDED 
*.. 31 STORED : 

* 32 DISCARDED 

♦SINCE TWO CHRS SHOULD BE THROWN AWAY; 

*THE TX LINE IS SET TO GO BACK TO A MARK STATE? 

♦THEREFORE THE RX BUFFER S/B: 

♦RXBA 31,25 

* 377,377 

♦(AT 8 BITS PER CHAR) 

♦THIS TEST IS DONE FOR BOTH ASYNC AND SYNC LINE CARDS. 

: ********* *« ******************** ************ * *************** ***** 



001226 
001216 



001244 
001236 



J TEST 4 
TST4: 



001244 
001236 



001244 
0Q1236 



001244 
001236 



100$: 



001220 



103$: 
105$: 



MOV 
MOV 
MOV 
MOVB 
MOV 
BMI 
USR , 
MOV 
MOVB 
MOV 
BMI 
USR 
MOV 
MOVB 
MOV 
BMI 
" USR 
MOV ■ 
MOVB 
MOV 
BMI 
USR 
SCOPE 

MOV 

RAMCLR 

CLRB 

CLRB 

CLRB 

CLRB 

CLRB 

MOV 



#4,TSTN0 
#TST5,NEXT 
#0. ,R0 

MASK. A,MASKX 
LOO, 03, STAT 
100$ 
PC, 105$ 
#4. ,R0 

MASK. B ,MASKX 
L04.07,STAT 
101$ 
PC, 105$ 
#8. ,R0 

MASK.C.MASKX 

LOB. 1 1 , STAT 

102$ 

PC, 1 05$ 

#12. ,R0 

MASK.D.MASKX 

L12.15.STAT 

103$ 

PC, 105$ 



#1$,L0CK 

TXTAB+25 

TXTAB+23 

TXTAB+31 

TXTAB+32 

TXTAB+377 

*TXBAP,R5 



J PLACE LINE NUMBER INTO RO 
{PLACE "MASK" FOR CHARS INTO MASKX 
{LOAD LINE CARD STATUS INTO STAT 
,{BR IF LINE CARD NOT TO BE TESTED 
{GO DO THE TEST FOR LINE CARD 1 
{ PLACE LINE NUMBER INTO RO 
} GET MASK 

{LOAD LINE CARD STATUS INTO STAT 
{ BR IF LINE CARD NOT TO BE TESTED 
{GO DO THE TEST FOR LINE CARD 2 
{LOAD LINE NUMBER 
{GET MASK 

{LOAD LINE CARD STATUS INTO STAT 
{BR IF, LINE CARD NOT TO BE TESTED 
{DO THE TEST FOR LINE CARD 3' 
(LOAD LINE NO. 
{GET MASKK 

{ LOAD LINE CARD STATUS 

{BR IF LINE CARD NOT TO BE TESTED 

{DO THE TESTS FOR LINE CARD 4 

{ SCOPE THIS TEST. 

{TEST ENTRANCE. 

{SET RETURN IF SW09»1 

{CLEAR ALL DV11 SEC REGISTERS 

{ZERO 

{ USED 

{ CONTROL 

; BYTES 

; FOR TRANSMITTER 

; LOAD . . 
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1603 


01 




01 2725 




1604 


01 




025 


023 


1605 


01 


406 






1606 


01 




^ 1 2 02M 


032 


1607 


01 




97^7 


000020 


1608 


01 


i aoo 


1 1 2737 


000020 


1609 


01 


1 426 


1 05037 


030205 


1610 


01 




1 05037 


03021 1 


161 1 


01 




1 270 2 


OOQ004 


1612 


01 


A AO 




1 67724 


1613 


01 


AAP, 


005037 


027560 


1614 


01 


- 


UU DUO / 


027562 


1615 


01 


456 


032737 


004000 


1616 


01 


464 


001 406 




1 61 7 


01 






0221 20 


1618 


01 


21 7 




001 


1619 


01 


1 AHA 


022560 




1620 


01 








1621 


01 


500 


000405 




1622 


01 


1502 


004537 


0221 20 


1623 


01 






001 


1624 


01 


Kin 


022556 




1625 


01 


i c;i o 


1 7 7772 




1626 


01 


1^14 






1627 


01 


R1 A 


032737 


004000 


1628 


01 




001 406 




1629 


01 


1 *OA 


00 4537 


022120 


1630 


01 


son 




005 


1631 


01 


1 532 


027560 




1632 


01 


1534 


1 77776 




1633 


01 








1634 


01 


1 540 


004537 


0221 20 


1635 


01 






005 


1636 


01 


1 546 


027560 




1637 


01 


1 qc;n 


1 7 7774 




1638 


01 


552 


004537 


022120 


1639 


01 


556 


010 


01 1 


1 640 


01 


1 560 


02 3560 




1641 


01 


562 


030 1 60 




1642 


01 


564 


004537 


0221 20 


1643 


01 






01 2 


1644 


01 


572 


000004 




1645 


01 


574 


00 000 1 




1646 


01 


576 




004000 


1647 


01 


1 604 


00 1412 




1648 


01 


1 606 


004537 


022164 


1649 


01 


1612 


020000 




1 650 


01 


1614 


004537 


0221 64 


1651 


01 


1620 


01 5000 




1652 


01 


1622 


004537 


022164 


1653 


01 


1626 


072000 




1654 










1655 


01 


1630 


000405 




1656 


01 


1632 


004537 


022164 


1657 


01 


1636 


034000 




1658 


01 


1640 


004537 


021706 
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SE0 0044 



030203 
030212 



MOV 

. BYTE 

MOV 

. BYTE 

MOVB 

MOVB 

CLRB 

CLRB 

MOV 

MOV 

CLR 

CLP 

BIT 

BEQ 

PERFORM 

. BYTE 

TXBAP 

-4 

BR 

PERFORM 

.BYTE 

SYNC 



BIT 
BEQ 

PERFORM 

. Bt'TE 

RXBA 

-2 

BR 

PERFORM 
. BYTE 
RXBA 



(PC)+, (R5)+ 
25,23 
(PC)+,(R5) 
31 ,32 

#BIT4,RXTAB+23 
#BIT4,RXTA8+32 
RXTAB+25 
RXTAB+31 

R0*,@DVSRS 
RXBA 
RXBA+2 
#ASYNC , STAT 
80$ 

, SETREG 
000,001 



81$ 

.SETREG 
000,001 



# ASYNC , STAT 
82$ 

, SETREG 
004,005 



83$ 

, SETREG 
004,005 



PERFORM 
.BYTE 
TXTAB 
RXTAB 

PERFORM , SETREG 
.BYTE 013,012 
BIT2 
BITO 
BIT 
BEQ 

PERFORM 
BIT13 
PERFORM , LOAD. MODE 
<BIT12+BIT11>+BIT9 
PERFORM , LOAD. MODE 
<BIT14+BIT13+BIT12>+BIT 

BR 2$ 
PERFORM , LOAD. MODE 
BIT13+BIT12+8IT11 
PERFORM ,SETSYNC 



, SETREG 
010,011 



#ASYNC , STAT 
60$ 

.LOAD. MODE 



TRANSMITTER 

DATA 

CHARS 

DSCARD 
DSCARD 

DEFAULT-STORE 

DEFAULT-STORE 

SET FOR 4 LINE GROUP 

LOAD LINE NO. 

MAKE SURE 

RX BUF FER = 

#IS THIS AN ASYNC LINE CARD? 

#BR IF NOT AS, YNC . 

^ADJUST FOR ASYNC LINE CARD 

^REGISTERS 

# LOAD FOR ASYNC 

H LOAD FOR ASYNC 

^CONTINUE TEST 



TX PRINCIPLE BA, 

SYNC CHAR 

2 SYNC, 4 DATA=6 



PRINCIPLE BC 



#IS THIS AN ASYNC LINE CARD? 

#BR IF NOT ASYNC. 

#ADUUST FOR ASYNC LINE CARD 

^REGISTERS 

#LQAD FOR ASYNC 

#LOAD FOR ASYNC 

^CONTINUE TEST 

RXBA, RXBC 



TX TABLE, RX TABLE 



LINE STATE, LINE PROTOCOL 
TX GO 

IDLE MARK ON BYTE CQUNTS=0 
#IS THIS ASYNC LINE CARD? 
#BR IF NO. 
# LOAD PARAMETERS. 
^RECEIVER ENABLE 



#8 BITS/PER/CHAR 



;#9600 BAUD. 



; LOAD 

;MODE+RX ENABLE 

; GET SYNC CHARS AND ADJUST FOR ONE OR TWO. 



CZDVDCO MACY11 30A(1052) 10-FEB-78 
13:55 

167512 

167504 



000025 
027560 



000031 
027561 



DVDC. 


P1 1 


02-FEB-78 


1659 


01 


1644 


005277 


1660 


01 


1650 


005005 


1661 


01 


1652 


105777 


1662 


01 


1656 


1 004C % 


1663 


01 


1660 


104414 


1664 


01 


1662 


005205 


1665 


01 


1664 


001372 


1666 


01 


1666 


104000 


1667 


01 


1670 




166B 


01 


1670 


01 2705 


1669 


01 


1674 


1 1 3704 


1670 


01 


1700 


020504 


1671 


01 


1702 


001401 


1672 


01 


1704 


104002 


1673 


01 


1706 


01 2705 


1674 


01 


1712 


1 1 3704 


1675 


01 


1716 


120504 


1676 


01 


1 720 • 


001401 


1677 


01 


1722 


104002 


1678 


01 


1724 


032737 


1679 


01 


1732 


001016 


1680 


01 


1734 


1 12705 


1681 








1682 








1683 


01 


1740 


143705 


1684 


01 


1744 


113704 


1685 


01 


1750 


120504 


1686 


01 


1752 


001401 


1687 


01 


1754 


104002 


1688 


01 


1756 


113704 


1689 


01 


1762 


120504 


1690 


01 


1764 


001401 


1691 


01 


1766 


104002 


1692 


01 


1770 


104412 


1693 


01 


1772 


104401 


1694 


01 


1774 


005200 


1695 


01 


1776 


005302 


1696 


01 


2000 


001220 


1697 


01 


2002 


000207 


1698 








1699 








1700 








1701 








1702 








1703 








1704 








1705 








1706 








1707 








1708 








1709 








1710 








1711 








1712 








1713 








1714 
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2$: 
3$: 



COPYRIGHT 1975 DIGITAL EQUIP. CORP. 



004000 
000377 



001244 
027562 



001236 6$: 



INC 


@DVSCR 


;SET MICRO CPU GO 


CLR 


R5 


; DELAY 


TSTB 


©DVSCR 


;FOR 


BMI 


4$ 


;RX INTERRUPT (BIT 7) 


DELAY 




; WASTE TIME 


INC 


R5 


; KEEP COUNTING. 


BNE 


3$ 


; BR 


HUT 




;BIT 7 OF DVSCR NOT SET! 


MOV 


#25, R5 


;SET EXPECTED 


MOVB 


RXBA, R4 


; GET FOUND 


CMP 


R5.R4 


;OK? 


BEQ 


5$ 




HLT 


2 


•'25' NOT FIRST IN RX BUFFER 


MOV 


#31 ,R5 


;NEXT CHAR S/B '31 ' 


MOVB 


RXBA+1 , R4 


;GET NEXT CHAR 


CMPB 


R5,R4 


;OK 


BEQ 


6$ 




HLT 


2 


•'31' NOT SECOND IN RX BUFFER 


BIT 


#ASYNC , STAT 


;#IS THIS AN ASYNC LINE CARD? 


BNE 


8$ 


;#BR IF YES. 


MOVB 


#377, R5 


;MARK=377 (NEXT CHAR) 


BICB 


MASKX , R5 


; CLEAR BITS/PER/CHAR MASK. 


MOVB 


RXBA+2, R4 


; GET FOUND 


CMPB 


R5,R4 


;ok 


BEQ 


7$ 




HLT 


2 


; EITHER TX NOT AT MARK (377) 


MOVB 


RXBA+3.R4 


;NEXT CHAR 


CMPB 


R5,R4 




BEQ 


8$ 




HLT 


2 


•IF ABOVE PASSED; RX WRONGl 


MSTCLR 




;INIT DV11 


SCOP1 




;LOCK ON CURRENT LINE? 


INC RO 




; UPDATE LINE POINTER 


DEC 


R2 


;4 LINES DONE? 


BNE 


1$ 


; BR IF NO 


RTS 


PC 


;EXIT FOR NEXT GROUP 


j ***** 


************** 


***** TEST 5 ******************** 



♦ TEST OF RECEIVER CONTROL BYTE OPERATIONS. 
♦TEST OF THE "INCLUDE IN BCC YES/NO FUNCTION" 

♦ TEST THAT THE CHAR "031" IS INCLUDED 

♦ IN THE BCC WHEN AT: 

♦ LRC8 
*CRC16 
♦CRC.CCITT 

♦THE RECEIVER BCC STARTS AT AND CALCULATES 

♦ ONLY ONE CHAR (31 ) . 

♦THIS TEST IS DONE FOR BOTH ASYNC AND SYNC LINE CARDS. 
:**************************************************************** 





MACY11 


30A(1052) 


10-FEB-78 15: 




P11 02-FEB-78 


13:55 




1 71 S 


012004 


012737 


000005 


001 226 


1716 


012012 


012737 


01 251 2 


001 216 




012020 


012700 


000000 




1 71 ft 


012024 


01 3737 


001416 


001 236 


1 71 Q 


01 2032 


1 00402 






i 79n 


012034 


004737 


01 21 22 




1 791 


01 2040 


012700 


000004 




1 722 


01 2044 


01 3737 


001 420 


A A « O A £ 

001 23d 




01 2052 


100402 






1 724 


012054 


0C4737 


01 21 22 




1 725 


012060 


012700 


000010 






012064 


013737 


001 422 


001236 


1 707 


01 2072 


100402 






1 79B 


012074 


004737 


0121*1 




1 79Q 


0121 00 


012700 


000014 




1 7^rt 
1 7^1 


012104 


013737 


001424 


001 236 




0121 12 


100402 






1 732 


0121 14 


004737 


01 21 22 




1 733 


0121 20 


104400 






1 734 


012122 








1 735 


012122 


01 2737 


012156 


001 220 




012130 


104413 






1 737 


012132 


105037 


02361 1 






0121 36 


112737 


00001 


03021 1 


1 739 


012144 


112737 


000031 


022360 


1 740 


012152 


012702 


000004 




1 741 


012156 










012156 


104412 






1 743 


012160 


010077 


167206 




1 744 


012164 


004737 


022224 




1 745 


012170 


004537 


022120 




1 746 


012174 


007, 


012 




1 747 


012176 


000000 






1 748 


012200 


000000 






1 749 


012202 


005277 


1 671 54 




1 750 


012206 


105777 


1 671 50 




1 751 


012212 


100375 






1 752 


012214 


112777 


000007 


4 07 4 EO 

1 67 1 92 


1 753 


012222 


017704 


1 671 50 




1 754 


012226 


005037 


022 1 1 6 




1 755 


012232 


012737 


000200 


Ann d fit' 

0241 1 2 


1 756 


012240 


004537 


021 740 




1 757 


012244 


000010 






1 758 


012246 


0000"»1 






1 759 


012250 


000000 






1 760 


012252 


01 3705 


0221 16 




1 761 


012256 


020504 






1 762 


012260 


001401 






1 763 


012262 


104004 






1764 


012264 


104412 






1765 


012266 


0'0077 


167100 




1766 


012272 


004737 


022224 




1767 


012276 


004537 


022120 




1768 


012302 


007 


012 




1769 


012304 


000000 






1770 


012306 


000010 







DV11 DEVICE DIAGNOSTICS. 



100$: 



COPYRIGHT 1975 DIGITAL EQUIP. CORP. 



SEO 0046 



102$: 



103$: 
105$: 



1$: 
64$: 



65$: 



66$: 



MOV 


#5,TSTNQ 




MOV 


#TST6,N£XT 




MOV 


HQ. , RO ' 


PLACE LINE NUMBER INTO RO 


MOV 


LOO. 03, STAT 


LOAD LINE CARD STATUS INTO STAT 


BMI 


1 00$ 


BR IF LINE CARD NOT TO BE TESTED 


JSR 


PC, 105$ 


GO DO THE TEST FOR LINE CARD 1 


MOV 


#4. ,R0 


PLACE LINE NUMBER INTO RO 


MOV 


L04.07,STAT 


LOAD LINE CARD STATUS INTO STAT 


BMI 


101$ 


BR IF LINE CARD NOT TO BE TESTED 


JSR 


PC, 105$ 


GO DO THE TEST FOR LINE CARD 2 


MOV 


#8. ,R0 


LOAD LINE NUMBER 


MOV 


L08.1 1 ,STAT 


LOAD LINE CARD STATUS INTO STAT 


BMI 


102$ 


BR IF LINE CARD NOT TO BE TESTED 


JSR 


PC, 105$ 


DO THE TEST FOR LINE CARD 3 


MOV 


#12. , RO 


LOAD LINE NO. 


MOV 


L12.15,STAT 


LOAD LINE CARD STATUS 


BMI 


103$ 


BR IF LINE CARD NOT TO BE TESTED 


JSR 


PC, 105$ 


DO THE TESTS FOR LINE CARD 4 


SCOP'2 




SCOPE THIS TEST. 






TEST ENTRANCE. 


MOV 


#1$, LOCK 


SET FOR "LOCK ON LINE". 


RAMCLR 




CLEAR ALL SEC REGISTERS 


CLRB 


TXTAB+31 * 


CLEAT CNTRL BYTE (TX) 


M0VB 


#BIT3,RXTAB+31 


SET "INC/BCC" IN RX CNTRL BYTE 


MOVB 


#31 , TXBAP 


SET TX DATA CHAR 


MOV 


#4,R2 


4 LINE GROUP 


MSTCLR 




INIT DV11 


MOV 


RO t$DVSRS 


LOAD LINE NO. 


JSR 


PC,DV1 10N 


GOSUB DV110N 


PERFORM 


, SETREG 




. BYTE 


007,012 


RXBCC, LINE PROTOCOL 







START BCC AT 0. 







POLQNOMINAL SELECT 


INC 


0DVSCR 


SET MICRO CPU GO 


TSTB 


0DVSCR 


WAIT FOR 


BP I. 


65$ 


BIT 7 OF DVSCR-1 


MOVB 


#7,ftDVSRSH 


;SEL RX BCC REG 


MOV 


<8»DVSRA,R4 , 


; READ BCC 


CLR 


CALBCC 


•SET SOFTWARE BCC-0 


MOV 


#LRC8,XPQtY 


} SET SOFTWARE PO LONOMINAL' 


JSR - 


R5,SIMBCC 


;GO GET SOFTWARE BCC 


8. 




{SHIFTS 


31 




; DATA 


o 




•.PREVIOUS BCC 


MOV 


CALBCC, R5 


J GET SOFTWARE BCC 


CMP 


R5.R4 


; S0FT«HARD? 


BO 


.+4 




HLT 


4 


! RECEIVER BCC INCORRECT 1 


MSTCLR 




{INIT DV11 


MOV 


R0,*DV5RS 


{LOAD LINE NO. 


JSR 


PCDV110N 


•QOSUB DV110N 


PERFORM 


, SETREG 




. BYTE 


007,012 


• RXBCC, LINE PROTOCOL 







{START BCC AT 0. 


BIT3 




; POLQNOMINAL SELECT 
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COPYRIGHT 1975. DIGITAL EQUIP. CORP. 



SEQ 0047 



1771 


012310 


005277 


167046 


1772 


012314 


105777 


167042 


1773 


012320 


100375 




1774 


012322 


112777 


000007 


1775 


012330 


017704 


167042 


1776 


012334 


005037 


022116 


1777 


012340 


012737 


120001 


1778 


012346 


004537 


021740 


1779 


012352 


000010 




1780 


012354 


000031 




1781 


012356 


000000 




1782 


012360 


013705 


022118 


1783 


012364 


020504 




1784 


012386 


001401 




1785 


012370 


104004 




1786 


012372 


104412 




1787 


012374 


01 0077 


166772 


1788 


012400 


004737 


022224 


1789 


012404 


004537 


022120 


1790 


012410 


007 


012 


1791 


012412 


000000 




1792 


012414 


000030 




1793 


012416 


005277 


166740 


1794 


012422 


105777 


1 66734 


1795 


012426 


100375 




1796 


012430 


112777 


000007 


1797 


012436 


017704 


166734 


1798 


012442 


005037 


022116 


1799 


012446 


012737 


102010 


1800 


012454 


004537 


021740 


1801 


012460 


0*0010 




1802 


012462 


000031 




1803 


012464 


000000 




1804 


012466 


013705 


022116 


1805 


012472 


020504 




1806 


012474 


001401 




1807 


012476 


104004 




1808 


012500 


104401 




1809 


012502 


005200 




1810 


012504 


005302 




1811 


012506 


001223 




1812 


012510 


000207 




1813 








1814 








1815 








1816 








1817 
1818 








1819 








1820 








1821 








1822 








1823 








1824 








1825 


012512 


012737 


000006 


1826 


012520 


012737 


012772 



68$: 



INC 


©DVSCR 


{SET MICRO CPU GO 


TSTB 


0DVSCR 


{WAIT FOR 


BPL 


67$ 


{BIT 7 OF DVSCR.»1 


MOVB 


07.0DVSRSH 


;SEL RX BCC REG 


MOV 


QDVSRA.R4 


; READ BCC 


CLR 


CALBCC 


{ SET SOFTWARE BCC«0 


MOV 


#CRC16,XP0LY 


{SET SOFTWARE POLONOMINAL 


JSR 


R5.SIMBCC 


{GO GET SOFTWARE BCC 


8. 




{SHIFTS 


31 




{DATA 







} PREVIOUS BCC 


M0V : 


CALBCC, R5 


; GET SOFTWARE BCC 


CMP 


RS,R4 


iSOFT«HARD? 


BEQ 


.+4 




HLT 


4 


RECEIVER BCC INCORRECT i 


MSTCLR 




{INIT DV11 


MOV 


RO.tDVSRS 


; LOAD LINE NO. 


JSR 


PCDV110N 


{GOSUB DV110N 


PERFORM 


, SETREG 




. BYTE 


007,012 


RXBCC, LINE PROTOCOL 







{START BCC AT 0. 


BIT4+BIT3 


; POLONOMINAL SELEC 


INC 


&DVSCR 


SET MICRO CPU GO 


TSTB 


9DVSCR 


WAIT FOR 


BPL 




BIT 7 OF DVSCR«1 


MQVB 


#7,0DVSRSH 


SEL RX BCC REG 


MOV 


QDVSRA.R4 


READ BCC 


CLR 


CALBCC 


SET SOFTWARE BCC«0 


MOV 


#CRC.CCITT,XPOLY 


{SET SOFTWARE POLC 


JSR 


R5,SIMBCC 


GO GET SOFTWARE BCC 


8. • 




SHIFTS 


31 




DATA 







PREVIOUS BCC 


MOV 


CALBCC, R5 I 


GET SOFTWARE BCC 


CMP 


R5,R4 


SOFT-HARD? 


BEQ 


.+4 




HLT 


4 


RECEIVER BCC INCORRECT! 


SCOP1 




LOCK ON SELECTED LINE? 


INC 


RO 


UPDATE LINE NO. POINTER 


DEC 


R2 


ALL LINES DONE? 


BNE 


1$ 


BR IF NO 


RTS 


PC 


EXIT FOR NEXT GROUP 



• hi* ***** * ****** ** * *** ** ** TEST 6 ****************************** 

;*TEST OF RECEIVER CONTROL BYTE OPERATIONS. 
{•TEST OF THE "NEXT MODE" FUNCTION. 
5*TES> THAT THE NEXT MODE REGISTER (015) 
{*CAN BE LOADED FROM THE CONTROL BYTES. 

{♦THIS TEST IS DONE FOR BOTH ASYNC AND SYNC LINE CARDS. 

; :************************* **************************** *********** 



MOV 
MOV 



#6,TSTN0 
#TST7,NEXT 



CZDVDCO 


MACY1 1 


30A(1052 


CZDVDC . 


P 1 1 02-FEB-78 


1827 


012526 


01 2700 


1828 


012532 


01 3737 


1829 


01 2540 


1 00402 


1830 


012542 


0047:-^ 


1831 


012546 


01 2700 


1832 


012552 


01 3737 


1833 


012560 


1 00402 


1834 


012562 


004737 


1 835 


012566 


01 2700 


1836 


012572 


01 3737 


1837 


012600 


1^0402 


1 838 


012602 


004737 


1839 


012606 


01 2700 


1 840 


012612 


01 3737 


1841 


012620 


100402 


1842 


012622 


004737 


1843 


012626 


104400 


1844 


012630 




1845 


012630 


01 2737 


1846 


012636 


104413 


1847 


012640 


005003 


1 848 


012642 


005001 


1849 


012644 


01 2702 


1850 


012650 


01 2737 


1851 


012656 


' 105037 


1852 


012662 


,110137 


1853 


012666 


004737 


1854 


012672 


004537 


1855 


012676 


015 


1856 


012700 


000000 


1857 


012702 


000000 


1858 


012704 


005277 


1859 


012710 


105777 


1860 


012714 


100375 


1861 


012716 


1 1 2777 


1862 


012724 


01 7704 


1863 


012730 


01 0305 


1864 


012732 


020504 


1865 


012734 


001401 


1866 


012736 


104002 


1867 


012740 


104412 


1868 


012742 


005203 


1869 


01 2744 


062701 


1870 


01 2750 


1 05701 


1871 


01 2752 


001743 


1872' 


012754 


005001 


1873 


01 2756 


005003 


1 874 


012760 


104401 


1875 


012762 


005200 


1876 


012764 


005302 


1877 


012766 


001335 


1878 


012770 


000207 


1879 






1880 






1881 
1882 
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000000 






MOV 


#0. ,R0 


PLACE LINE NUMBER INTO RO 


001416 


001236 




MOV 


LOO. 03, STAT 


LOAD LINE CARD STATUS INTO STAT 




BMI 


100$ 


BR IF LINE CARD NOT TO BE TESTED 


012630 






JSR 


PC, 105$ 


GO DO THE TEST FOR LINE CARD 1 


000004 




100$: 


MOV 


#4. ,R0 


PLACE LINE NUMBER INTO RO 


001420 


001236 




MOV 


L04.07.STAT 


LOAD LINE CARD STATUS INTO STAT 






BMI 


101$ 


BR IF LINE CARD NOT TO BE TESTED 


012630 






JSR 


PC, 105$ 


GO DO THE TEST FOR LINE CARD 2 


000010 




101$: 


MOV 


#8. ,R0 


LOAD LINE NUMBER 


001422 


001236 




MOV 


LOS. 11 , STAT 


LOAD LINE CARD STATUS INTO STAT 






BMI 


102$ 


BR IF LINE CARD NOT TO BE TESTED 


012630 






JSR 


PC, 105$ 


DO THE TEST FOR LINE CARD 3 


000014 




102$: 


MOV 


#12. ,R0 


LOAD LINE NO. 


001424 


001236 




MOV 


L12.15,STAT 


LOAD LINE CARD STATUS 






BMI 


103$ 


BR IF LINE CARD NOT TO BE TESTED 


012630 






JSR 


PC, 105$ 


DO THE TESTS FOR LINE CARD 4 




103$: 


SCOPE 




SCOPE THIS TEST. 






105$: 






TEST ENTRANCE . 


012662 


001220 




MOV 


#1$, LOCK 


SET IF SW09=1 








RAMCLR 




CLEAR ALL SEC REGISTERS 








CLR 


R3 


SET EXPECT RESULTS OF MODE REGISTER 








CLR 


R1 


SET CNTRL BYTE MODE 


000004 






MOV 


#4,R2 ' 


SET F0R4 LINE GROUP 


000031 


022560 




MOV 


#31,TXBAP 


LOAD TX DATA CHAR 


02361 1 






CLRB . 


TXTAB+31 


ZERO TX CNTRL BYTE 


03021 1 




1$: 


MOVB 


R1 .RXTAB+31 


LOAD RX CNTRL BYTE (WITH MODE) 


022224 








rt T U v l i UfN 


QPTIID DnilTtMP THTWRC /D& ac 1 C IPt 
UU JtlUr PCUUIlINC 1 nllNOO ^ DM , SU , L9 , Lr ) 


022120 






PERFORM 


, SETREG 


ZERO 


015 






. BYTE 


015,015 


RECEIVER 











MODE 













REGISTER 


166452 






INC 


©DVSCR 


SET MICRO CPU GO 


166446 






TSTB 


©DVSCR 


WAIT FOR 








BPL 


.-4 


DVSCR07=1 


000015 


166450 




MOVB 


#15,@DVSRSH 


SEL RX MODE REGISTER 


166446 






MOV 


©DVSRA.R4 


READ MODE REGISTER 



3$: 



MOV 
CMP 
BEO 
HLT 

MSTCLR 

INC 

ADD 

TSTB 

BEQ 

CLR 

CLR 

SC0P1 

•INC 

DEC 

BNE 

RTS 



R3.R5 
R5 , R4 
3$ 
2 

R3 

#BIT5,R1 

R1 

1$ 

R1 

R3 

RO 
R2 
1$ 
PC 



SET EXPECTED MODE 



RX MODE REGISTER WRONG 
INIT DV11 

UPDATE EXPECTED MODE 

UPDATE LOADED (NEXT) MODE 

ALL DONE? 

BR IF NO 

ZERO LOAD MODE 

ZERO EXPECTED MODE 

LOCK ON SELECTED LINE? 

UPDATE LINE POINTER 

4 LINE GROUP DONE? 

BR IF NO 

EXIT FOR NEXT GROUP OF LINES 



;************************ TEST 7 ********************* 

;*T£ST OF TRANSMITTER CONTROL BYTE OPERATIONS. 
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1883 

1884 

1885 

1886 

1887 

1888 

1889 

1890 

1891 

1892 

1893 

1894 

1895 

1896 

1897 

1898 

1899 

1900 

1901 

1902 

1903 

1904 

1905 

1906 

1907 

1908 

1909 

1910 

1911 

1912 

1913 

1914 

1915- 

1916 

1917 

1918 

1919 

1920 

1921 

1922 

1923 

1924 

1925 

1926 

1927 

1928 

1929 

1930 

1931 

1932 

1933 

1934 

1935 

1936 

1937 

1938 
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COPYRIGHT 1975 DIGITAL EQUIP . CORP. 



SEQ 0049 



;*TEST OF THE "SEND DLE NEXT" FUNCTION 

; *THE "TRANSMITTER DLE REGISTER" IS LOADED 

;*WITH CHAR "025". THE RECEIVER IS SET TO RECEIVE 

;*ONE CHAR (THE DLE) SO RX BA S/B=25 

;*THE TRANSMITTER DATA CHAR IS "031". 

>:*** 1 K*****i| I «>|t*i|E««****i)ci|i]|cDc*iti***********************)| 



************** 






2772 


012737 


000007 


001226 





3000 


01 2737 


013244 


001216 





3006 


012700 


000000 







3012 


01 3737 


001416 


001236 





3020 


100402 









3022 


004737 


0131 10 







3026 


01 2700 


000004 







3032 


01 3737 


001420 


001236 





3040 


100402 









3042 


004737 


0131 10 







3046 


01 2700 


000010 







3052 


01 3737 


001422 


001236 





3060 


100402 









3062 


004737 


0131 10 







3066 


01 2700 


000014 







3072 


01 3737 


001424 


001236 





3100 


100402 









3102 


004737 


0131 10 







3106 


104400 









3110 











3110 


01 2737 


013144 


001220 





3116 


104413 









3120 


112737 


000002 


023611 





3126 


1 1 2737 


000031 


022560 





3134 


105037 


030211 







3140 


01 2702 


000004 







3144 


004737 


022224 







3150 


004537 


022120 







3154 


012 


012 







3156 


01 2400 









3160 


012400 









3162 


005037 


027560 







3166 


005277 


166170 







31 72 


105777 


166164 







3176 


10 03-- 5 









3200 


01 3704 


027560 







3204 


01 2705 


000025 







3210 


020504 









3212 


001401 









3214 


104003 









3216 


104412 









3220 


V2777 


000012 


166146 





3226 


005077 


166144 







3232 


104401 









3234 


005200 









3236 


005302 









3240 


001341 







103$: 
105$: 



MOV 


#7,TSTN0 


MOV 


#TST10,NEXT 


MOV 


#0.,R0 


MOV 


LOO. 03, STAT 


BMI 


100$ 


JSR 


PC, 105$ 


MOV 


#4. ,R0 


MOV 


L04.07,STAT 


BMI 


101$ 


JSR 


PC, 105$ 


MOV 


#8. ,R0 


MOV 


L08.1 1 , STAT 


BMI 


102$ 


JSR 


PC, 105$ * 


MOV 


#12. ,R0 


MOV 


L1 2. 15, STAT 


BMI 


103$ 


JSR 


PC, 105$ 


SCOPE 




MOV 


#1$,L0CK 


RAMCUR 




MOVB 


#BIT1 , TXTAB 


MOVB 


#31 ,TXBAP 


CLRB 


RXTAB+31 


MOV 


#4,R2 


JSR 


PCDV110N 


PERFORM 


, SETREG 


. BYTE 


012,012 


25*400 




25*400 




CLR 


RXBA 


INC • 


@DVSCR 


TSTB 


@DVSCR 


BPL 


.-4 


MOV 


RXBA,R4 


MOV 


#25, R5 


CMP 


R5,R4 


B r cQ 


2$ 


HLT 


3 


MSTCLR 




MOVB 


#12,@DVSRSH 


CLR 


©DVSRA 


SC0P1 




INC 


RO 


DEC 


R2 


BNE 


1$ 



PLACE LINE NUMBER INTO RO 

LOAD LINE CARD STATUS INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

GO DO THE TEST FOR LINE CARD 1 

PLACE LINE NUMBER INTO RO 

LOAD LINE CARD STATUS INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

GO DO THE TEST FOR LINE CARD 2 

LOAD LINE NUMBER 

LOAD LINE CARD STATUS INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

DO THE TEST FOR LINE CARD 3 

LOAD LINE NO. 

LOAD LINE CARD STATUS 

BR IF LINE CARD NOT TO BE TESTED 

DO THE TESTS FOR LINE CARD 4 

SCOPE THIS TEST. 

TEST ENTRANCE. 

SET IF SW09=1 

CLEAR ALL SEC REGISTERS 

SET "SND/DLE" IN CNTRL BYTE 

SET TX DATA CHAR 

ZERO RX CNTRL BYTE 

SET FOR 4 LINE GROUP 

SET ROUTINE THING 

LINE PROTOCOL REG 
PUT 25 

IN HIGH BYTE. . 
ZERO RX BUFFER 
SET MICRO CPU GO 
WAIT FOR 
DVSCR07»1 
GET DATA 

LOAD DLE INTO EXPECTED 



25 (DLE) NOT 1ST IN RX BUFFER 
INIT DV11 

SEL LINE PROTOCOL 
ZERO IT. 

LOCK ON SELECTED LINE? 
UPDATE LINE POINTER 
4 LINE GROUP DONE? 
BR IF NO • ' 



COPYRIGHT 1975 DIGITAL EQUIP . CORP. 



SEQ 0050 



1939 
1940 
1941 
1942 
1943 
1944 
, 1945 
1946 
1947 
1948 
1949 
1950 
1951 
1952 
1953 
1954 
1955 
1956 
1957 
1958 
1959 
1960 
1961 
1962 
1963 
1964 
1965 
1966 
1967 
1968 
1969 
1970 
1971 
1972 
1973 
1974 
1975 
1976 
1977 
1978 
1979 
1980 
1981 
1982 
1983 
1984 
1985 
1986 
1987 
1983 
1989 
1990 
1991 
1992 
1993 
1994 



013242 000207 



RTS 



; EXIT FOR NEXT GROUP OF LINES 



013244 
013252 
013260 
013264 
013272 
013274 
013300 
013304 
013312 
013314 
013320 
013324 
013332 
013334 
013340 
013344 
013352 
013354 
013360 
013362 
013362 
013370 
013372 
013376 
013404 
013412 
013416 
013424 
013432 
013440 
013444 
013450 
013452 
013454 
0134S2 
01346S 
013470 
013472 
013476 
013502 
013504 
013506 
013514 



012737 
012737 
01 2700 
013737 
100402 
004737 
012700 
01 3737 
100402 
004737 
012700 
01 3737 
100402 
004737 
01 2700 
01 3737 
100402 
4737 
104400 

012737 
104413 
012702 
1 1 2737 
113737 
004737 
112777 
052777 
112737 
005277 
105777 
100375 
005005 
112777 
017704 
001401 
104001 
105277 
017704 
001401 
104001 
112777 
017704 



. *****************^****** TEST 10 ****************************** 

;*TEST OF BOTH BIT iff 6 AND 5 OF THE LINE PROTOCOL REG. 
;*TEST THAT NEI T HER THE TRANSMITTER OR RECEIVER 
;*CONTROL BYTES ARE USED AND THAT 

• *THE CHARS ARE AUTOMATICALLY INCLUDED INTO THE BCC. 

;*THIS TEST IS DONE FOR BOTH ASYNC AND SYNC LINE CARDS. 

. « **************************************************************** 



000010 


001226 


TST10: 


MOV 


#1 , TSTNO 


013554 


001216 




MOV 


#TST1 1 ,NEXT 


000000 






MOV 


#0 . , RO 


001416 


001236 




MOV 


LOO. 03, STAT 






BMI 


1 00$ 


013362 






JSR 


PC, 105$ 


000004 




100$: 


MOV 


#4. ,R0 


001420 


001236 




MOV 


L04.07,STAT 






BMI 


101$ 


013362 






JSR 


PC, 105$ 


000010 




101$: 


, MOV 


#fl. , RO 


001422 


001236 




MOV 


L08. 1 1 ,STAT 






BMI 


1 02$ 


013362 






JSR 


PC, 105$ 


000014 




102$: 


MOV 


#12.,R0 


001424 


001236 




MOV 


L1 2. 15, STAT- 






BMI 


1 03$ 


013362 






JSR 


PC, 105$ 




103$: 


SCOPE 








105$: 






1 341 2 


001 220 




MOV 


ft 1 * , LUUrN 








RAMCLR 




000004 






MOV 


04, R2 


000340 


023575 




MOVB 


//BIT7+B1T6+ 


023575 


030175 




MOVB 


TXTAB+15',RX 


022224 




1$: 


JSR 


PC , DV1 1 0N 


000012 


165750 




MOVB 


#12,®DVSRSH 


000140 


165744 




BIS 


0BIT6+BIT5,fl 


000015 


022560 




MOVB 


#15,TXBAP 


165716 






INC 


0DVSCR 


165712 






TSTB 


0DVSCR 








BPL 


.-4 








CLR 


R5 


000014 


165712 




MOVB 


4M4,®DVSRSH 


165710 






MOV 


QDVSRA,R4 








BEQ 


.+4 








HLT 


1 


165670 






INCB 


QDVSRSH 


165674 






MOV 


0DVSRA,R4 








BEQ 


3$ 








HLT 


1 


000006 


165660 


3$: 


MOVB 


06,8>DVSRSH 


165656 






MOV 


®DVSRA,R4 



PLACE LINE NUMBER INTO RO 
LOAD LINE CARD STATUS INTO STAT 
BR IF LINE CARD NOT TO BE TESTED 
GO DO THE TEST FOR LINE CARD 1 
PLACE LINE NUMBER INTO RO 
LOAD LINE CARD STATUS INTO STAT 
BR IF LINE CARD NOT TO BE TESTED 
GO DO THE TEST FOR LINE CARD 2 
LOAD LINE NUMBER 
LOAD LINE CARD STATUS INTO STAT 
BR IF LINE CARD NOT TO BE TESTED 
DO THE TEST FOR LINE CARD 3 
LOAD LINE NO. 
LOAD LINE CARD STATUS 
BR IF LINE CARD NOT TO BE TESTED 
DO THE TESTS FOR LINE CARD 4 
SCOPE THIS TEST. 
TEST ENTRANCE. 
SET RETURN IF SW09-1 
CLEAR ALL SEC REGISTERS 
SET FOR 4 LINE GROUP 
TXTAB+15 

5 !SET RX AND TX NEXT M0DE«7 

{SET UP MINOR DETAILS 

;GET LINE PROTOCOL REGISTER 

A iSET TX AND RX DDCMP MODE 

LOAD DATA CHAR 

SET MICRO CPU GO 

WAIT FOR 

DVSCR07«1 

EXPECTED»0 

GET TX MODE REG f 

READ MODE REG 

S/B-0 

TX MODE REG S/B-0 
GET RX MODE REG 
READ RX MODE 

RX MODE REG S/B-0 
TX BCC REG, ' 
{READ TXBCC REG. 
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1995 


013520 


001001 






1996 


013522 


104000 






1997 


013524 


105277 


165644 




1998 


013530 


01 77C4 


165642 




1999 


013534 


001001 






2000 


013536 


104000 






2001 


013540 


104412 






2002 


013542 


104401 






2003 


013544 


005200 






2004 


013546 


005302 






2005 


013550 


001320 






2006 


013552 


000207 






2007 










2008 










2009 










2010 










2011 










2012 










2013 










2014 










2015 










2016 










2017 










2018 










2019 










2020 










2021 










2022 


013554 


012737 


000011 


001226 


2023 


013562 


012737 


014166 


001216 


2024 


013570 


01 2700 


000000 




2025 


013574 


113737 


001406 


001244 


2026 


013602 


013737 


001416 


001236 


2027 


013610 


100402 






2028 


013612 


004737 


0137&2 




2029 


013816 


012700 


000004 




2030 


013622 


113737 


001407 


001244 


2031 


013630 


01 3737 


001420 


001236 


2032 


013636 


100402 






2033 


013640 


004737 


013722 




2034 


013644 


012700 


000010 




2035 


013650 


1 1 373? 


001410 


001244 


2036 


013656 


013737 


001422 


001236 


2037 


013664 


100402 






2038 


013666 


004737 


013722 




2039, 


013672 


012700 


000014 




2040 


013676 


113737 


001411 


001244 


2041 


013704 


013737 


001424 


001236 


2042 


013712 


100402 






2043 


013714 


004737 


013722 




2044 


013720 


104400 






2045 


013722 








2046 


013722 


032737 


004000 


001236 


2047 


013730 


001401 






2048 


013732 


000207 






2049 


013734 


012737 


014004 


001220 


2050 


013742 


104413 







4$: 



8NE 

HLT 

INCB 

MOV 

BNE 

HLT 

MSTCLR 

SC0P1 

INC 

DEC 

BNE 

RTS 



4$ 


QDVSRSH 

®DVSRA,R4 

5$ 





RO 
R2 

1$ 
PC 



COPYRIGHT 1975 DIGITAL EQUIP. CORP. 
;S/B NOT«0 

{ NOTHING IN BCCI I (TX) 
{GET RX BCC REG 
{ READ INTO R4 
! 

{NOTHING IN RXBCCll 
;INIT DV11 

; LOCK ON SELECTED LINE? 
{UPDATE LINE POINTER 
{4 LINES DONE? 
; BR IF NO 

; EXIT FOR NEXT 4 LINE GROUP 



SEQ 0051 



• * ***************** ******' TEST 1 1 ****************************** 
;*TEST OF BIT 1 IN LINE PROTOCOL PARAMETER REGISTER. 
;*TEST OF "STRIP LEADING SYNCS" . 

}*TEST TO XMIT 10. SYNC CHARS, 1 NON-SYNC, AND 2 SYNCS 
;*[13 CHARS TOTAL]. 

;*DV11 SHOULD RECEIVE 1 NON-SYNC, AND TWO SYNCS. 
;*[ 3 CHARS TOTAL] . 

;*THE TEN LEADING SYNCS S/B STRIPPED 

{♦THIS TEST IS ' DONE FOR SYNC LINE CARDS ONLY. 

• ***************************************************************** 



TST11: 



100$; 



102$: 



103$: 
1 05$ : 



MOV 


#11 f TSTNO 




MOV 


#TST12,NEXT 




MOV 


#0.,R0 


{PLACE LINE NUMBER INTO RO 


MOV St 


MASK. A,MASKX 


{PLACE "MASK" FOR CHARS INTO MASKX 


MOV 


LOO. 03, STAT 


{LOAD LINE CARD STATUS INTO STAT 


BMI 


100$ 


; BR IF LINE CARD NOT TO BE TESTED 


JSR > 


PC, 105$ 


;G0 DO THE TEST FOR LINE CARD 1 


MOV 


#4. ,R0 


{PLACE LINE NUMBER INTO RO 


MOVB 


MASK. B,MASKX 


{GET MASK 


MOV 


L04.07,STAT 


{LOAD LINE CARD STATUS INTO STAT 


BMI 


101$ 


; BR IF LINE CARD NOT TO BE TESTED 


JSR 


PC, 105$ 


;G0 DO THE TEST FOR LINE CARD 2 


MOV 


#8. ,R0 


{ LOAD LINE NUMBER 


MOVB 


MASK.CMASKX 


{GET MASK 


MOV 


LOB. 11, STAT 


{LOAD LINE CARD STATUS INTO STAT 


BMI 


102$ 


; BR IF LINE CARD NOT TO BE TESTED 


JSR 


PC, 105$ 


{DO THE TEST FOR LINE CARD 3 


MOV 


012. ,R0 


{ LOAD LINE NO. 


MOVB 


MASK.D,MASKX 


{GET MASKK 


MOV 


L12.15.STAT 


{LOAD LINE CARD STATUS 


BMI 


103$ 


;BR IF LINE CARD NOT TO BE TESTED 


JSR , 


PC, 105$ 


;D0 THE TESTS FOR LINE CARD 4 


SCOPE 




{SCOPE THIS TEST. 






{TEST ENTRANCE. 


BIT 


#ASYNC,STAT 


{(CIS THIS AN ASYNC LINE CARD? 


BEQ 


.+4 


{ *BR IF NOT ASYNC LINE CARD. 


RTS 


PC 


;*EXIT TEST. (ASYNC LINE CARD NOT TESTED) • 


MOV 


#2$ .LOCK 


;SET RETURN IF SW09«1 


RAMCLR 




{CLEAR ALL SEC REGISTERS 



CZDVDCO 


MACY11 30A(1052) 


10-FE 


C2DVDC.P11 02 


-F EB-78 


13:55 


2051 


013744 


01 2702 


000004 


2052 


013750 


01 2704 


000010 


2053 


013754 


01 2705 


022560 


2054 


013760 


1 1 3725 


001236 


2055 


01 3764 


005304 




2056 


013766 


00 1 374 




,2057 


01 3770 


1 1 2725 


000005 


2058 


01 3774 


113725 


001236 


2059 


01 4000 


1 1 3725 


001236 


2060 


01 4004 


004737 


022224 


2061 


014010 


005037 


027560 


2062 


014014 


00 5.037 


027562 


2063 


01 4020 


004537 


022120 


2064 


014024 


001 


OCa 


2065 


014026 


1 77763 




2066 


014030 


1 77775 




2067 


014032 


1 1 2777 


000012 


2068 


01 4040 


01 2777 


000143 


2069 


01 4046 


005277 


165310 


2070 


01 4052 


1 05777 


165304 


2071 


014056 


1 0375 




2072 


014060 


01 2705 


000005 


2073 


014064 


1 1 3704 


027560 


2074 


014070 


04 2704 


177400 


2075 


01 4074 


020504 




2076 


014076 


00 1 401 




2077 


014100 


1 04001 




2078 


014102 


1 1 3705 


001236 


2079 


014106 


042705 


177400 


2080 


014112 


1 43705 


001244 


2081 


014116 


1 1 3704 


027561 


2082 


014122 


042704 


177400 


2083' 


014126 


020504 




2084 


014130 


00 1 401 




2085 


014132 


1 0400 1 




2086 


014134 


1 1 3704 


027562 


2087 


014140 


042704 


177400 


2088 


014144 


a n AC A A 




2089 


014146 






2090 


014150 


4 a a a A i 




2091 


014152 


1 44 1 2 




2092 


014154 


1 0440 1 




2093 


014156 


A A CI AA 




2094 


014160 






2095 


014162 


A A H "3 1 A 
UU 1 J I u 




2096 


014164 


A A AlrtT 




2097 








2098 








2099 








2100 








2101 








2102 








2103 








2104 








2105 








2106 









15: 
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.5$:- 



COPYRIGHT 1975 DIGITAL EQUIP. CORP. 

4 LINE GROUP 
LOAD TX BUFFER 
WITH 
8. SYNC 
CHARS 

I LOAD "NON-SYNC" CHAR 
I SYNC 
| SYNC 

;MINOR DETAIL SETUP 
i CLEAR 
|RX BUFFER 

| TX PRINCIPLE BC, RX BC 



LINE PROTOCOL REG 
IT0,@DVSRA 

LP=TX+RX DDCMP, STRIP SYNC, IDLE MARK 

WAIT FOR 

DVSCR07=1 

1ST DATA S/B=15 

GET DATA 

STRIP HIGH BYTE 

OK 

1ST CHAR N0T=15 

LOAD SYNC INTO EXPECTED 

STRIP HIGH BYTE 

CLEAR BITS/PER/CHAR MASK. 

GET 2ND CHAR 

STRIP HIGH BYTE 

WERE *ONLY* LOADING- SYNC STRIPPED? 

JUST *LEADING* SYNCS ARE TO BE. STRIPPED 
GET 3RD CHAR 
STRIP HIGH BYTE 
OK? 

JUST ^LEADING* SYNCS ARE TO. BE STRIPPED 
INIT DV11 . 

LOCK ON SELECTED LINES? 
UPDATE LINE POINTER 
4 LINE GROUP DONE? 
BR IF NO 

EXIT FOR NEXT GROUP 



; ************************ TEST 12 ****************************** 
;*TEST OF BIT08 OF DVSCR . 

;*TEST OF " RECEIVER INTERUPT RESPONSE COMPLETE" 

;*TEST TO RECEIVE 6 CHARS INTERUPTING 

:*ON EACH CHAR HAVING IT BEING A "SPECIAL CHAR" 

;*AND THE RESTARTING THE MICRO PROCESSOR AFTER EACH 

;*INTERUPT FLAG. „ 

;*THIS TEST IS DONE FOR BOTH ASYNC AND SYNC LINE CARDS. 



SEQ 0052 



MOV 


#4,R2 


MOV 


#8.,R4 ; 


MOV 


#TXBAP,R5 


MOVB 


STAT , ( R5)+ 


DEC 


R4 


BNE ' 


1$ 


MOVB 


#5,(R5)+ 


MOVB 


STAT, (R5)+ 


MOVB 


STAT, (R5)+ 


JSR 


PC, DV1 10N 


CLR 


RXBA 


CLR . 


RXBA+2 


PERFORM 


,SETREG 


. BYTE 


001 ,005 


-13. 




-3 




MOVB 


#12,@DVSRSH 


MOV 


#BIT6+BIT5+BIT1+ 


INC 


©DVSCR 


TSTB 


@DVSCR 


BPL 


.-4 ' 


MOV 


#5,R5 


MOVB 


RXBA.R4 * 


BIC 


#"C<377>,R4 


CMP 


R5,R4 


BEQ 


3$ 


HLT 


1 


MOVB 


STAT.R5 


BIC 


#*C<377>,R5 


BICB 


MASKX.R5 


MOVB 


RXBA+1 ,R4 


BIC 


#~C<377>,R4 


CMP 


R5.R4 


BEQ 


4$ 


HLT 


1 


MOVB 


RXBA+2, R4 


BIC 


#~C<377>,R4 


CMP 


R5.R4 


BEQ 


5$ 


HLT 


1., 


' MSTCLR 




SCOP1 




INC 


RO 


DEC 


R2 


BNE 


2$ 


RTS 


PC 
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SEQ 0053 



2107 










2108 










2109 










2110 










21 1 1 


014166 


01 2737 


000012 


001226 


2112 


014174 


01 2737 


014650 


001216 


2113 


014202 


01 2700 


000000 




2114 


014206 


01 3737 


001416 


001236 


2115 


014214 


100402 






21 16 


014216 


004737 


014304 




2117 


014222 


01 2700 


000004 




2118 


014226 


01 3737 


001420 


001236 


2119 


014234 


100402 






2120 


014236 


004737 


014304 




2121 


014242 


01 2700 


000010 




2122 


014246 


01 3737 


001422 


001236 


2123 


014254 


1 0402 






2124 


01 4256 


004737 


014304 




2125 


014262 


012700 


000014 




2126 


014266 


013737 


001424 


001236 


2127 


014274 


1 00402 






2128 


014276 


004737 


014304 




2129 


014302 


104400 






2130 


014304 








2131 


014304 


01 2737 


014362 


001220 


2132 


014312 


104413 






2133 


014314 


005001 






2134 


014316 


01 2702 


000004 




2135 


014322 


005005 






2136 


014324 


01 2704 


022560 




2137 


014330 


1 : 0524 






2138 


014332 


005205 






2139 


014334 


022705 


000007 




2140 


014340 


001373 






2141 


014342 


012705 


000006 




2142 


014346 


01 2704 


030160 




2143 


014352 


1 12724 


000001 




2144 


014356 


005305 






2145 


014360 


001374 






2146 


014362 


004737 


022224 




2147 


014366 


004537 


022120 




2148 


014372 


001 


005 




2149 


014374 


177770 






2150 


014376 


177772 






2151 


014400 


112777 


000012 


164766 


2152 


014406 


052777 


000100 


164762 


2153 


014414 


01 2737 


000340 


177776 


2154 


014422 


01 2777 


014472 


164722 


2155 


014430 


012777 


000340 


164716 


2156 


014436 


052777 


000101 


164716 


2157 










2158 


014444 


005003 






2159 


014446 


005037 


014646 




2160 


014452 


005037 


177776 




2161 


014456 


104414 






2162 


014460 


005237 


014646 





************************>! 



****************** 



103$: 
105$: 



MOV 

MOV 

MOV 

MOV 

BMI 

JSR 

MOV 

MOV 

BMI 

JSR 

MOV . 

MOV 

BMI 

JSR 

MOV 

MOV 

BMI 

JSR 

SCOPE 

MOV 

RAMCLR 

CLR 

MOV 

CLR 

MOV , 

MOVB '. 

INC 

CMP 

BNE 

MOV 

MOV 

MOVB 

DEC 

BNE 

JSR 

PERFORM 
.BYTE 
-8. 
-6 

MOVB 

BIS 

MOV 

MOV 

MOV 

BIS 

CLR 

CLR 

CLR 

DELAY 

INC 



#12,TSTN0 

#TST13,NEXT 

#0.,R0 

LOO. 03, STAT 

100$ 

PC , 1 05$ 

#4.,R0 

L04.07.STAT 

101$ 

PC, 105$ 

#8. ,R0 

L08. 1 1 , STAT 

102$ 

PC, 105$ 

#12. , RO 

L1 2. 15, STAT 

1 03$ 

PC, 105$ 



#66$, LOCK 
R1 

#4,R2 
R5 

#TXBAP,R4 
R5, (R4)+ 
R5 

#7,R5 
1$ 

#6,R5 

#RXTAB,R4 

#BIT0,(R4)+ 

R5 

2$ 

PC , DV 1 1 0N 
,SETREG 
001 ,005 



#12,@DVSRSH 
#BIT6,@DVSRA 
#340, PS 
#67$,@DVRVEC 
#340,@DVRLVL 
#BIT6+BI TO, ©DVSCR 

R3 
69$ 
PS 



PLACE LINE NUMBER INTO RO 

LOAD LINE CARD STATUS INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

GO DO THE TEST FOR LINE CARD 1 

PLACE LINE NUMBER INTO RO 

LOAD LINE CARD STATUS INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

GO DO THE TEST FOR LINE CARD 2 

LOAD LINE NUMBER 

LOAD LINE CARD STATUS INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

DO THE TEST FOR LINE CARD 3 

LOAD LINE NO. 

LOAD LINE CARD STATUS 

BR IF LINE CARD NOT TO BE TESTED 

DO THE TESTS FOR LINE CARD 4 

SCOPE THIS TEST. 

TEST ENTRANCE. 

CLEAR ALL SEC REGISTERS 

SET FOR 4 LINE GROUP 

LOAD 

TX DATA 



FILL 
THE 

RX CNTRL TABLE 
WITH SPECIAL 
CHAR BITS 
SET UP DV11 

TX PRINCIPLE BC, RX BC 



LINE PROTOCOL 
TX DDCMP 

LOCK OUT INTERUPTS 
SET RX INTER VECTOR. 
SET PRIO. LEVEL TO 7 



SET RX IE AND UCPU GO. 
DATA IMAGE 
STALL COUNTER 
ENABLE INTERUPTS 
WASTE TIME 
UPDATE STALL * 
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2163 

2164 

2165 

2166 

2167 

216B 

2169 

2170 

2171 

2172 

2173 

2174 

2175 

2176 

2177 

21 78' 

2179 

2180 

2181 

2182 

2183 

2184 

2185 

2186 

2187 

2188 , 

2189 

2190 

2191 

2192 

2193 

2194 

2195 

2196 

2197 

2198 

2199 

2200 

2201 

2202 

2203 

2204 

2205 

2203 

2^07, 

2208 

2209 

2210 

2211 

2212 

2213 

2214 

2215 

2216 

2217 

2218 
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014464 


001372 






BNE 


.-12 


014466 


104000 






HLT 


-(SP) ,-(SP) 


014470 


024646 






CMP 


014472 


01 00C3 




67$: 


MOV 


R0,R5 


014474 


000305 






SWAB 


R5 


014476 


050305 






BIS 


R3,R5 


014500 


01 7704 


164662 




MOV 


©DVRIC, R4 


014504 


020504 






CIV" 


R5 , R4 


014506 


001401 






BEQ 


4$ 


014510 


104001 






HLT 


1 

#BIT8,<3>DVSCR 


014512 


0*72777 


000400 


164642 4$: 


BIS 


014520 


005203 






INC 


R3 


014522 


022703 


000006 




CMP 


#6,R3 


014526 


001403 






BEQ 


70$ 


014530 


01 2716 


014446 




MOV 


fC3$, (SP) 


014534 


000002 






RTI 




014536 


042777 


000100 


164616 70$: 


BIC 


#BIT6,0DVSCR 


014544 ' 


012716 


014552 




MOV 


#68$, (SP) 


014550 


000002 






RTI 




014552 


105777 


164604 


68$: 


TSTB 


QDVSCR 


014556 


100375 






BPL 


.-4 


014560 


010005 






MOV 


R0.R5 


014562 


000305 






SWAB 


R5 


014564 


052705 


040005 




BIS 


#BIT14+5,R5 


014570 


017704 


164572 




MOV 


<5>DVRIC,R4 


014574 


020504 






CMP 


R5.R4 


014576 


001401 






BEQ 


5$ 


014600 


104001 






HLT 


1 


014602 


012701 


037560 


5$: 


MOV 


#RXBA,R1 


014606 


005005 






CLR 


R5 


014610 


005004 






CLR 


R4 


014612 


112104 




6$: 


MOVB 


(R1 ) + ,R4 


014614 


020504 






CMP 


R5,R4 


014616 


001401 






BEQ 


7$ 


014620 


104001 






HLT 


1 


014622 


005205 




7$: 


INC 


R5 


014624 


022705 


000006 




CMP 


fVG,R5 


014330 


001370 






BNE 


6$ 


014632 


104412 






MSTCLR 




014334 


104401 






SC0P1 




014336 


005200 






INC 


RO 


014640 


005302 






DEC 


R2 


014342 


001247 






BNE 


66$ 


014644 


000207 






RTS 


PC 


014S43 


000000 




69$: 
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BR BACK 

NO INTERUPT OCCURED. 
FAKE AN INTERUPT 
LOAD LINE NO. 
PUT IN HIGH BYTE 
SET DATA 

READ FOUND RESULT 



DVRIC WRONG! 

SET "RECEIVER INT RESP COMP" 

UPDATE DATA IMAGE 

ALL DONE? 

BR IF YES 

SET RETURN 

CONTINUE 

NO MORE INTERUPTS. 

SET RETURN 

CONT. 

WAIT FOR 

DVSCR07«1 

LOAD LINE NO. 

PUT IN HIGH BYTE 

" BYTE CNT WARNING + DATA" 

READ RESULTS 



SEQ 0054 



DVRIC WRONGI 
GET RX POINTER 



GET RX DATA (INCQRE) 



RECEIVER PLACED DATA IN CORE WRONG 
UPDATE DATA IMAGE 
ALL DONE? 
BR IF NO 
INIT DV11 

LOCK ON CURRENT LINE? 
UPDATE LINE POINTER 
4 LINE GROUP DONE? 
BR IF NO 

EXIT FOR NEXT GROUP OF LINES 



************************* TEST 13 ******#*********************** 

•;*TES,T OF THE "MARKED BYTE COUNT". 

{♦TEST THAT WHEN BIT15-0 FOR THE RECEIVER THAT 

{♦BITS 13,14,15 OF LINE STATE OCCUR IN 

{♦THE RECEIVER MODE BITS REGISTER. 

{♦TEST THAT WHEN BIT13«0 FOR THE TRANSMITTER 

{♦THAT BITS 13,14,15 OF THE LINE PROGRESS REGISTER 

{♦OCCUR INT THE TRANSMITTER MODE REG. 

{♦ALSO VERIFY THAT BIT10-1 IN LINE STATE MAKES 
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2219 
2220 
2221 
2222 
2223 
2224 
2225 
2226 
2227 
2228 

2229 014650 012737 000013 

2230 014656 012737 015442 

2231 014664 012700 000000 

2232 014670 013737 00141-3 

2233 014676 100402 

2234 014700 004737 014766 

2235 014704 012700 000004 

2236 014710 013737 001420 

2237 014716 100402 

2238 014720 004737 014766 

2239 014724 012700 000010 

2240 014730 013737 001422 

2241 014736 100402 

2242 014740 004737 014766 

2243 014744 012700 000014 

2244 014750 013737 001424 

2245 014756 100402 

2246 014760 004737 014766 

2247 014764 104400 

2248 014766 

2249 014766 012737 015114 

2250 014774 032737 001400 

2251 015002 001401 

2252 015004 000207 

2253 01500S 104413 

2254 015010 012702 000004 

2255 015014 012704 000012 

2256 015020 012705 023560 

2257 015024 112725 000010 

2258 015030 005304 

2259 015032 001374 

2260 015034 012705 023560 

2261 015040 013704 001236 

2262 015044 0427",4 177400 

2263 015050 060405 

2264 015052 105015 

2265 015054 01 2705 022560 

2266 015060 005004 

2267 015062 110425 

2268 015064 005204 

2269 015066 0^2704 000013 

2270 015072 001373 

2271 015074 01 2705 030160 

2272 015100 012704 000012 

2273 015104 112725 000010 

2274 0151 10 005304 
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SEQ 005S 



{♦RECEIVER "EXPECT THE BCC" 

{♦AND THAT BIT10 IN LINE PROGRESS TELL TX TO SEND BCC. 

{♦THIS TEST USES CRC.CCITT FOR THE POLYNOMIAL 

;**NOTE*: IF LINE CARD IS SET FOR OTHER THAN "8" BITS 

; ♦ THE TEST WILL *NOT* BE EXECUTED ON THAT LINE CARD1I 

!*THrS TEST IS DONE FOR BOTH ASYNC AND SYNC LINE CARDS. 

• :♦*♦♦*****♦*** *********** ***************** 



001226 TST13: 
001216 



101$: 



001220 
001236 



103$: 
105$: 



1$: 



3$: 



MOV 
MOV 
MOV 
MOV 
BMI 
USR 
MOV 
MOV 
BMI 
USR 
MOV 
MOV 
BMI 
USR 
MOV 
MOV 
BMI 
JSR 
SCOPE 

MOV i 
BIT 
BEQ 
RTS 

RAMCLR 

MOV 

MQV 

MOV 

MOVB 

DEC 

BNE" 

MOV ■ 

MOV 

BIC 

ADD 

CLRB 

MOV 

C'.R 

MOVB 

INC 

CMP 

BNE 

MOV 

MOV 

M0V6 

DEC 



#13,TSTN0 

#TST14,NEXT 

ffO. ,R0 

LOO. 03, STAT 

100$ 

PC, 105$ 

#4. ,R0 

L04.07.STAT 

101$ 

PC, 105$ 

#8. ,R0 

L08. 1 1 , STAT 

102$ 

PC, 105$ 

#12. ,R0 

L12.15.STAT 

103$ 

PC, 105$ 



#65$, LOCK 
#BIT9+BIT8,STAT 

.+4 
PC 

#4,R2 
#10. ,R4 
#TXTAB,R5 

#BIT3,(R5)* 
R,4 
1$ 

#TXTAB, R5 
STAT.R4 
#*C<377>,R4 
R4,R5 
(R5) 

#TXBAP,RB 
R4 

R4,(R5)+ 
R4 

#11., R4 

2$ 

#RXTAB, R5 
#10.,R4 
#BIT3,(R5)» 
R4 



{PLACE LINE NUMBER INTO RO 

{LOAD LINE CARD STATUS INTO STAT 

{BR IF LINE CARD NOT TO BE TESTED 

{GO DO THE TEST FOR LINE CARD 1 

{PLACE LINE NUMBER INTO RO 

{LOAD LINE CARD STATUS INTO STAT 

,' BR IF LINE CARD NOT TO BE TESTED 

{GO DO THE TEST FQR LINE CARD 2 

{LOAD LINE NUMBER 

{ LOAD LINE CARD STATUS INTO STAT 

{BR IF LINE CARD NOT TO BE TESTED 

{DO THE TEST FOR LINE CARD 3 

{LOAD LINE NO. 

{LOAD LINE CARD STATUS 

J BR IF LINE CARD NOT TO BE TESTED 

J DO THE TESTS FOR LINE CARD 4 

{ SCOPE THIS TEST. 

{TEST ENTRANCE. 

{ SET RETURN IF SW09»1 

{"8 BITS/PER/CHAR ?" 

{BR IF YES 

{EXIT TEST FOR THIS LINE CARD! 

{CLEAR ALL SECONDARY REGISTERS 

{SET FOR 4 LINE GROUP 

{ LOAD 10 BYTES 

{WITH 

{INC/BCC 

; - 

{CLEAR 

! SYNC 

{CONTROL 

{ BYTE 

! 

{LOAD 
{ DATA 
{ INTO 

{ TRANSMITTER BUFFER 

? 



? 

{ LOAD 
»10 

{ RECEIVER 
{CONTROL BYTES 
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SEQ 0066 



2275 


015112 


00 1 374 




2276 


0151 14 


01 0077 


1 64252 


2277 


01 51 20 


032737 


004000 


2278 


015126 


00 1 406 




2279 


015130 


004537 


0221 20 


2280 


01 51 34 


000 


001 


2281 


01 51 36 


022560 




2282 


015140 


077766 




2283 


01 51 42 


000405 




2284 


01 51 44 


004537 


0221 20 


2285 


015150 


000 


001 


2286 


01 51 52 


022556 




2287 


01 51 54 


077764 




2288 


01 51 56 


004537 


0221 20 


2289 


01 51 62 


004 


005 


2290 


01 51 64 


027560 




2291 


01 51 66 


077766 




2292 


01 51 70 


004537 


0221 20 


2293 


01 51 74 


010 


01 1 


2294 


01 51 76 


023560 




2295 


01 5200 


030160 




2296 


015202 


004537 


0221 20 


2297 


01 5206 


1 2 


013 


2298 


01 521 


OOOOw' 1 




2299 


01 521 2 


1 62004 




2300 


01 521 4 


004537 


0221 20 


2301 


01 5220 


1 6 


017 


2302 


01 5222 


1 62000 




2303 


01 5224 


000000 




2304 


01 5226 


032737 


004000 


2305 


01 5234 


* 1412 




2306 


01 5236 


004537 


0221 64 


2307 


01 5242 


020000 




2308 


01 5244 


004537 


0221 64 


2309 


01 5250 


1 5000 




2310 


01 5252 


004537 


0221 64 


231 1 


01 5256 


072000 




231 2 








231 3 


01 5260 


000405 




231 4 


01 5262 


004537 


0221 64 


231 5 


01 5266 


034000 




231 6 


015270 


004537 


021 706 


231 7 


01 5274 


005277 


1 64062 


231 8 


01 5300 


1 05777 


1 64056 


231 9 


1 5304 


1 00375 






1 5306 


1 7704 




2321 


015312 


01 0005 




2322 


015314 


000305 




2323 


015316 


052705 


050000 


2324 


015322 


020504 




2325 


015324 


001401 




2326 


015326 


104001 




2327 


015330 


1 1 2777 


000014 


2328 


015336 


01 7704 


164034 


2329 


015342 


0127^5 


000007 


2330 


015346 


020504 





65$: 



60$: 
61$: 



164036 4$: 



3$ 

RO,<g>DVSRS 
#ASYNC,STAT 
80$ 

, SETREG 
000,001 



BNE 
MQV 
BIT 
BEQ 

PERFORM 
. BYTE 
TXBAP 
<-lO.>-BIT1S 
BR 81$ 
PERFORM , SETREG 
.BYTE 000,001 

<-12.>~BIT15 
PERFORM , SETREG 
. BYTE 004,005 
RXBA 

<-10.>~BIT15 
PERFORM , SETREG 



.BYTE 
TXTAB 
RXTAB 
PERFORM 
. BYTE 



010,011 



WITH "INC/BCC" 
LOAD LINE NO, 

#IS THIS AN ASYNC LINE CARD? 

#BR IF NOT ASYNC. 

^ADJUST FOR ASYNC LINE CARD 

^REGISTERS 

0LQAD FOR ASYNC 

;#LOAD FOR ASYNC 
^CONTINUE TEST 

TX PRINCIPLE BA, BC 

MARKED BC! 



MARKED BC! 



TX TABLE, RX TABLE 



SETREG 
012,013 



LINE PROTOCOL, LINE STATE 
BIT4+BIT3+BIT0 jCRC.CCITT, IDLE MARK 
BIT15+BIT14+BIT13+BIT10+BIT2 



PERFORM , SETREG 
.BYTE 016,017 
BiV15+BIT14+BIT13+BIT10 


BIT 0ASYNC , STAT 

BEQ 60$ 
PERFORM , LOAD. MODE 
BIT13 

PERFORM , LOAD. MODE 
<BIT12+BIT11>+BIT9 
PERFORM , LOAD. MODE 
<BIT14+BIT13+BIT12>+BIT1 

BR 61$ 
PERFORM , LOAD .MODE 
BIT13+BIT12+BIT1 1 
PERFORM ,SETSYNC 



INC 
TSTB 
BPL 
MOV 
MOV 
SWAB 
BIS 
CMP 
BEQ 
HLT 
MOVB 
MOV 
MOV 
CMP 



0DVSCR 
6»DVSCR 
.-4 

®DVRIC,R4 
R0,R5 
R5 

#BIT14+BIT12,R5 
R5.R4 
4$ 
1 

#14,@DVSRSH 
@DVSRA,R4 
#BIT2+BIT1+BIT0,R5 
R5 , R4 



MODE 7, , TXGO 

LINE PROGRESS REC, REC CNTR STORE 

NEXT M0DE«7 

ZERO 

#IS THIS ASYNC LINE CARD? 

#BR IF NO. 

# LOAD PARAMETERS . 

#RECEI VER ENABLE . 

# 

#8 BITS/PER/CHAR 
# 

#9600 BAUD. 
LOAD 

MODE AND RECV ENABLE 

GET SYNC CHARS AND ADJUST FOR ONE OR TWO. 
SET MICRO CPU GO 
WAIT FOR 
DVSCR07«1 
READ RESULT 
LOAD LINE NUMBER 
PUT IN HIGH BYTE 
SET "BLOCK CHECK COMPLETE" 
RIC OK 



DVRIC INCORRECT 
GET TX MODE REGISTER 



; WAS NEXT MODE PICKED UP? 
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SEQ 0057 



2331 


015350 


001401 




2332 


015352 


104001 




2333 


015354 


105277 


164014 


2334 


015360 


01 7704 


164012 


2335 


015364 


020504 




2336 


015366 


001401 




2337 


015370 


1C4001 




2338 


015372 


005005 




2339 


015374 


112777 


000006 


2340 


015402 


01 7704 


163770 


2341 


015406 


001401 




2342 


015410 


104001 




2343 


015412 


105277 


163756 


2344 


015416 


01 7704 


163754 


2345 


015422 


001401 




2346 


015424 


104001 




2347 


015426 


104413 




2348 


015430 ' 


104401 




2349 


015432 


005200 




2350 


015434 


005302 




2351 


015436 


001226 




2352 


015440 


000207 




2353 








2354 








2355 








2356 








2357 








2358 








2359 








2360 








2361 








2362 








2363 








2364 








2365 








2366 








2367 








2368 








2369 








2370 








2371 








2372 


015442 


012737 


000014 


2373 


015450 


01 2737 


016222 


2374 


015456 


01 2700 


000000 


2375 


015462 


01 3737 


001416 


2376' 


015470 


100402 




2377 


015472 


004737 


015560 


2378 


015476 


01 2700 


000004 


2379 


015502 


013737 


001420 


2380 


015510 


100402 




2331 


015512 


004737 


015560 


2382 


015516 


012700 


000010 


2383 


015522 


01 3737 


001422 


2384 


015530 


100402 




2385 


015532 


004737 


015560 


2386 


015536 


012700 


000014 



BEQ 


5$ 






HLT 


1 


NEXT MODE INCORRECT/ S/B=7 




INCB 


@DVSRSH 


SEL RX MODE REG 




MOV 


@DVSRA,R4 


READ 




CMP 


R5,R4 






BEQ 


6$ 






HLT 


1 


RX MODE REGISTER INCORRECT 


S/B=7 


CLfif 


R5 


SET EXPECTED=0 


MOVB 


#6,@DVSRSH 


SEL TX BCC REG 




MOV 


©DVSRA.R4 


READ 




BEQ 


7$ 


BR IF=0 




HLT 


1 


IF BCC WAS SENT; BCC S/B=0 




INCB 


©DVSRSH 


SEL RX BCC REG 




MOV 


@DVSRA,R4 


READ IT 




BEQ 


8$ 






HLT 


1 


IF RX RECV ED GOOD BCC; BCC 


S/B=0 


RAMCLR 




CLEAR ALL SEC REG 




SC0P1 




LOCK ON CURRENT LINE? 




INC 


RO 


UPDATE LINE POINTER 




DEC 


R2 


4 LINE GROUP DONE? 




BNE 


65$ 


BR IF NO 




RTS 


PC 


EXIT FOR NEXT 4 LINE GROUP 





************************ test 14 ****************************** 

♦TEST OF THE "MARKED BYTE COUNT". 

♦TEST THAT WHEN BIT15=0 FOR THE RECEIVER THAT 

♦BITS 13,14,15 OF LINE STATE OCCUR IN 

♦THE RECEIVER MODE BITS REGISTER. 

♦TEST THAT WHEN BIT15=0 FOR THE TRANSMITTER 

♦THAT BITS 13,14,15 OF THE LINE PROGRESS REGISTER 

•OCCUR INT THE TRANSMITTER MODE REG. 

♦ALSO VERIFY THAT BIT10=1 IN LINE STATE MAKES 

♦RECEIVER "EXPECT THE BCC" 

♦AND THAT BIT10 IN LINE PROGRESS TELL TX TO SEND BCC. 

♦THIS TEST USES LRC8 FOR THE POLYNOMIAL. 

♦THIS TEST IS DONE FOR BOTH ASYNC AND SYNC LINE CARDS. 

: ************** ♦ fc*********,),* ****** **************** *************** 



001226 
001216 



MOV 
MOV 
MOV 
MOV 
BMI 
JSR 
MOV 
MOV 
BMI 
JSR 
MOV 
MOV 
BMI 
JSR 
MOV 



#14,TSTN0 

#TST15,NEXT 

#0. ,R0 

LOO. 03, STAT 

100$ 

PC, 105$ 

#4. ,R0 

L04.07,STAT 

1 01 $ 

PC, 105$ 

#8. ,R0 

L08.11 ,STAT 

102$ 

PC, 105$ 

#12. ,R0 



; PLACE LINE NUMBER INTO RO 

; LOAD LINE CARD STATUS INTO STAT 

;BR IF LINE CARD NOT TO BE TESTED 

;G0 DO THE TEST FOR LINE CARD 1 

{PLACE LINE NUMBER INTO RO 

; LOAD LINE CARD STATUS INTO STAT 

;BR IF LINE CARD NOT TO BE TESTED 

;G0 DO THE TEST FOR LINE CARD 2 

; LOAD LINE NUMBER 

; LOAD LINE CARD STATUS INTO STAT 
; BR IF LINE CARD NOT TO BE TESTED 
;D0 THE TEST FOR LINE CARD 3 
; LOAD LINE NO. 
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MACY1 1 
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2387 


01 5542 


01 3737 


001424 


2388 


01 5550 


1 00402 




2389 


01 5552 


004737 


015560 


2390 


015556 


1 04400 




2391 


01 5560 






2392 


015560 


01 2737 


015674 


,2393 


015566 


104413 




2394 


015570 


01 2702 


000004 


2395 


015574 


01 2704 


000012 


2396 


01 5600 


01 2705 


023560 


2397 


01 5604 


1 1 2725 


000010 


2398 


015610 


005304 




2399 


015612 


001374 




2400 


01 5614 


01 2705 


023560 


2401 


015620 


01 3704 


001236 


2402 


015624 


042704 


177400 


2403 


01 5630 


060405 




2404 


01 5632 


1 0501 5 




2405 


01 5634 


01 2705 


022560 


2406 


015640 


005004 




2407 


015642 


1 1 0425 




2408 


015644 


005204 




2409 


015646 


022704 


000013 


241 


01 5652 


001373 




241 1 


015654 


01 2705 


030160 


2412 


015660 


01 2704 


000012 


2413 


015664 


1 1 2725 


000010 


2414 


015670 


005304 




241 5 


015672 


001374 




2416 


01 5674 


01 0077 


163472 


241 7 


01 5700 


032737 


004000 


2418 


01 5706 


001406 




2419 


015710 


004537 


022120 


2420 


015714 


000 


001 


2421 


015716 


022560 




2422 


015720 


077766 




2423 


01 5722 


000405 




2424 


01 5724 


004537 


022120 


2425 


01 5730 


000 


001 


2426 


01 5732 


022556 




2427 


01 5734 


077764 




2428 


01 5736 


004537 


022120 


2429 


01 5742 


004 


005 


2430 


01 5744 


0275' 




2431 


01 5746 


077766 




2432 


015750 


004537 


022120 


2433 


1 5754 




011 


2434 


015756 


023560 




2435 


015760 


030160 




2436 


015762 


004537 


022120 


2437 


015766 


012 


013 


243S 


015770 


000001 




2439 


015772 


162004 




2440 


015774 


004537 


022120 


2441 


016000 


016 


017 


2442 


016002 


162000 
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103$: 
105$: 
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SEQ 0058 



3$: 
65$: 



80$: 



81$: 



MOV 


L12.15.STAT ; 


I HAh | tub A BT\ CTATIIC 

LOAD LINE CARD STATUS 


BMI 


1 03$ ; 


UN 1 r LINE UAKU InU 1 lw DC 1 u3 1 EU 


JSR 


PC|105$ 


n*n tub tcctc Pno i tmp rton a 


SCOPE 




slurc I nib leal. 
TEST ENTRANCE. 


MOV 


#65$, LOCK 


SET RETURN IF SW09»1 


RAMCLR 




/■» i cab ai i c e a b v DCftTCTCDC 
CLEAR ALL SECONUARY KculalcKa 


MOV 


iV4,R2 


cpt eno a i tmp ftonno 

acl run H LIlNfc UNUUr 


MOV 


01 . , R4 * 


LUAU 10 BY 1 bs 


MOV 


#TXTAB,R5 


WI TH 


MOVB 


0BIT3, (R5) + 


INC/BCC 


DEC 


R4 




BNE 


1$ 




MOV 


TXTAB , R5 


CLEAR « 


MOV 


STAT , R4 




BIC 


#"C<377> , R4 


LUNTROL 


ADD 


R4,R5 
(R5) 


BYTE 


CLRB 




MOV 


0TXBAP, R5 


LOAD 


CLR 


R4 


DATA 


MOVB 


R4, (R5) + 


INTO 


INC 


R4 


TRANSMITTER BUFFER 


CMP 


#11., R4 




BNE 


2$ 






ff nA 1 MD , r\9 


LOAD 


MOV 


010. ,R4 


10 


MOVB 


#BIT3, (R5) + 


RECEIVER 


DEC 


R4 


CONTROL BYTES 


BNE 


3$ 


WITH " INC/BCC" 


MOV 


R0,@DVSRS 


LOAD LINE NO. 


BIT 


#ASYNC , STAT 


#IS THIS AN ASYNC LINE CARD? 


BED 


80$ 


#BR IF NOT ASYNC. 


PERFORM 


, SETREG 


^ADJUST FOR ASYNC LINE CARD 


. BYTE 


000,001 


^REGISTERS 



TXBAP 
<»10.>-BIT15 
BR 81$ 
PERFORM , SETREG 
. BYTE 000,001 
SYNC 

<-12.>-BIT1S 

PERFORM , SETREG 
. BYTE 004,005 
RXBA 

<-10.>-BIT15 
PERFORM .SETREG 



. BYTE 
TXTAB 
RXTAB 
PERFORM 
. BYTE 
BIT0 



010,01 1 



, SETREG 
012,013 

}LRCC 

BIT15+BXT14+BIT13+BIT1 
PERFORM , SETREG 
. BYTE 016,017 
BIT15+BXT14+BIT13+BIT1 



#L0AD FOR ASYNC 

;#L0AD FOR ASYNC 
tVCONTINUE TEST 

TX PRINCIPLE BA, BC 

MARKED BC! 

RX BA, BC 

MARKED BCI 

TX TABLE, RX TABLE 



; LINE PROTOCOL, LINE STATE 
IDLE MARK 
0+BIT2 

{MODE 7, , TXGO 

; LINE PROGRESS REC, REC CNTR STORE 
{NEXT MODE-7 
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SEQ 0059 



2443 


01S004 


000000 













; ZERO 


2444 


01S006 


032737 


004000 


001238 




BIT 


rfASYNC.STAT 


?#IS THIS ASYNC LINE CARD? 


2445 


016014 


001412 








BEQ 


60$ 


;#BR IF NO. 


2446 


016016 


004537 


022164 






PERFORM 


, LOAD. MODE 


{#LOAD PARAMETERS. 


2447 


016022 


020000 








BIT13 




; //RECEIVER ENABLE 


2448 


01S024 


004537 


022164 






PERFORM 


, LOAD. MODE 


?# 


2449 


016030 


01 5000 








<BIT12+BIT11>+BIT9 


;#6 BITS/PIR/CHAR 


2450 


018032 


004537 


022164 






PERFORM 


, LOAD. MODE 




2451 


016036 


072000 








<5IT14+BIT13+BIT12>+BIT1 




2452 
















{#9600 BAUD. 


2453 


016040 


000405 








BR 


61$ 




2454 


016042 


004537 


022164 




60$: 


PERFORM 


, LOAD. MODE 


{ LOAD 


2455 


016046 


034000 








BIT13+BIT12+BIT11 


{MODE AND RECV ENABLE 


2456 


016050 


004537 


021706 






PERFORM 


,SETSYNC 


{ GET SYNC CHARS AND ADJUST FOR ONE 


2457 


016054 


005277 


163302 




61$: 


INC 


QDVSCR 


{SET MICRO CPU GO 


2458 


016060 


105777 


163276 






TSTS 


QDVSCR 


{ WAIT FOR 


2459 


016064 


100375 








BPL 


.-4 


;DVSCR07«1 


2460 


016066 


01 7704 


163274 






MOV 


®DVRIC,R4 


{READ RESULT 


2461 


016072 


010005 








MOV 


R0,R5 


{ LOAD LINE NUMBER 


2462 


016074 


000305 








SWAB 


R5 


; PUT IN HIGH BYTE 


2463 


016076 


052705 


050000 






BIS 


#BIT14+BIT12,R5 


{SET "BLOCK CHECK COMPLETE" 


2464 


016102 


020504 








CMP 


R5,R4 


{RIC OK 


2465 


016104 


001401 








BEQ 


4$ 




2466 


016106 


104001 








HLT 


1 


{DVRIC INCORRECT 


2467 


0161 10 


112777 


000014 


163256 


4$: 


' MOVB 


fM4,®DVSRSH 


{GET TX MODE REGISTER 


2468 


0161 16 


017704 


163254 






MOV 


<§>DVSRA,R4 




2469 


016122 


012705 


000007 






MOV 


#8IT2+BIT1+BIT0, 


R5 {WAS NEXT MODE PICKED UP? 


2470 


016126 


020504 








CM» 


R5,R4 




2471 


016130 


001401 








DEO 


5$ 




2472 


016132 


104001 








HLT 


1 


•NEXT MODE INCORRECT/ S/B-7 


2473 


016134 


1C5277 


163234 




5$: 


INCB :. 


0DVSRSH 


;SEL RX MODE REG 


2474 


016140 


01 7704 


163232 






MOV 


@DVSRA,R4 


{READ 


2475 


016144 


020504 








CMP 


R5.R4 

6$ 




2476 


016146 


001401 








BEQ 




2477 


016150 


104001 








HLT 


1 


{RX MODE REGISTER INCORRECT. S/B-7 


2478 


016152 


005005 






6$: 


CLR 


R5 


{ SET EXPECTED-0 


2479 


016154 


112777 


000006 


163212 




MOVB 


#6,9DVSRSH 


{ SEL TX BCC REG 


24S0 


016162 


01 7704 


163210 






MOV 


0DVSRA,R4 


; READ 


2481 


016166 


001401 








BEQ 


7$ 


{BR IF«0 


2482 


016170 


104001 








HLT 


1 


{IF BCC WAS SENT} BCC S/S-0 


2483 


016172 


105277 


163176 




7$: 


INCB 


GDVSRSH 


{SEL RX BCC REG 


2484 


016176 


01 7704 


163174 






MOV 


*>DVSRA,R4 


{ READ IT 


2485 


016202 


001401 








BEQ 


0$ 




2486 


016204 


104001 








HLT 


1 


•IF RX RECVED GOOD BCC; BCC S/B-0 


2487 


016206 


104413 






8$: 


RAMCLR 




{CLEAR ALL SEC REG 


24S8 


016210 


104401 








SC0P1 




{LOCK ON CURRENT LINE? 


2489 


016212 


005200 








INC 


RO 


{UPDATE LINE POINTER 


2490 


016214 


005302 








DEC 


R2 


;4 LINE GROUP DONE? 


2491 


016216 


001226 








BNE 


65$ 


{ BR IF NO 


2492 


016220 


000207 








RTS 


PC 


; EXIT FOR NEXT A LINE GROUP 


2493 


















2494 


















2495 












;************************ TEST 15 ************************* 


2496 












;*TEST OF RECIEVER AND TRANSMITTER MODE BITS. 


2497 












J*TEST TO TRANSMIT AND RECEIVE 


2498 












",*A DIFFERENT CHAR FROM 


EACH 
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2499 
2500 
2501 
2502 
2503 
2504 
2505 
'2506 
2507 
2508 
2509 
2510 
251 1 
2512 
2513 
2514 
2515 
2516 
2517 
2518 
2519 
2520 
2521 
2522 
2523 

2524 016222 

2525 016230 

2526 016236 

2527 016242 

2528 016250 

2529 016252 

2530 016256 

2531 016262 

2532 016270 

2533 016272 
25.34 016276 

2535 016302 

2536 016310 

2537 016312 

2538 016316 

2539 016322 

2540 016330 

2541 016332 

2542 016336 

2543 016340 
2544' 016340 

2545 016346 

2546 016350 

2547 016354 

2548 016360 

2549 016364 

2550 016370 

2551 016374 

2552 016376 

2553 016400 

2554 016404 
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SEQ 0060 



♦MODE. THE TX TABLE WILL BE 
♦FILLED WITH "SEND DLE" SO IF CHAR 
♦ GOES' TO WRONG TABLE RX WILL 
♦RECEIVE A DLE CHAR(31). THE RX 
♦FILLS TABLE WITH "INCLUDE IN BCC" 
♦SO THAT IF RECV GOES TO WRONG 
♦TABLE THE RX BCC REG WILL 
♦3E NON-ZERO! 

♦CHAR CURRENT MODE NEXT MODE 



♦ 15 





1 


♦ 16 


1 


2 


♦ 21 


2 


3 


♦ 23 


3 


4 


* 25 


4 


5 


♦ 7 


5 


6 


* 34 


6 


7 


* 32 


7 


7 


♦ 36 


7 


7 


* 






* 






♦THIS TEST 


IS DONE FOR 


BOTH 



;*****♦*****♦♦♦♦*♦**♦♦*♦♦*♦♦♦♦♦**♦♦***♦*******♦*♦*♦♦♦************ 









; TEST 


15 




012737 


000015 


001226 


TST15: 


MOV 


#15,TSTN0 


012737 


017166 


001216 




MOV 


#TST16,NEXT 


01 2700 


000000 






MOV 


#0. ,R0 


01 3737 


001416 


001236 




MOV 


LOO. 03, STAT 


100402 








BMI 


100$ 


004737 


016340 






JSR 


PC,105$ 


01 2700 


000004 




100$: 


MOV 


#4. ,R0 


013737 


001420 


001236 




MOV 


L04.07.STAT 


100402 








BMI 


101$ 


004737 


016340 






JSR 


PC,105$ 


01 2700 


000010 




101$: 


MOV 


#8. ,R0 


01 3737 


001422 


001236 




MOV 


L08.11 ,STAT 


100402 








BMI . 


102$ 


004737 


016340 






JSR 


PC, 105$ 


012700 


000014 




102$: 


MOV 


#12. ,R0 


01 3737 


001424 


001236 




MOV 


L1 2. 15, STAT 


100402 








BMI 


103$ 


004737 


016340 






JSR 


PC, 105$ 


104400 






103$: 
105$: 


SCOPE 




01 2737 


016604 


001220 




MOV 


#12$, LOCK 


104413 








RAMCLR 




01 2705 


023560 






MOV 


#TXTAB,R5 


01 2704 


030160 






MOV 


#RXTAB,R4 


01 2701 


004000 






MOV 


#4000, R1 
#BIT1 , (R5) + 


112725 


000002 




1$: 


MOVB 


112724 


000010 




2$: 


MOVB 


#BIT3, (R4)+ 


005301 








DEC 


R1 


001372 








BNE 


1$ 


004537 


021706 






PERFORM 


.SETSYNC 


012702 


000004 




11$: 


MOV 


#4,R2 



PLACE LINE NUMBER INTO RO 

LOAD LINE CARD STATUS INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

GO DO THE TEST FOR LINE CARD 1 

PLACE LINE NUMBER INTO RO 

LOAD LINE CARD STAT.US INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

GO DO THE TEST FOR LINE CARD 2 

LOAD LINE NUMBER 

LOAD LINE CARD STATUS INTO STAT 

BR IF LINE CARD NOT TO BE TESTED 

DO THE TEST FOR LINE CARD 3 

LOAD LINE NO. 

LOAD LINE CARD STATUS 

BR IF LINE CARD NOT TO BE TESTED 

DO THE TESTS FOR LINE CARD 4 

SCOPE THIS TEST. 

TEST ENTRANCE. 

LOCK ON LINE RETURN 

CLEAR ALL SEC REGISTERS 

LOAD 

ALL CNTRL BYTES 
WITH " SND/DLE" 
WITH "INCL/BCC" 



GET SYNC CHARS AND ADJUST FOR ONE OR TWO. 
SET FOR 4 LINE GROUP 
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2555 


016410 


11 3705 


001236 






MOVB 


STAT.R5 


CLEAR 


2556 


016414 


042705 


177400 






BIC 


#~C<377>,R5 


SYNC 


2557 


016420 


012704 


023560 






MOV 


#TXTAB,R4 


ENTRY 


2558 


016424 


060504 








ADD 


R5, R4 


IN 


2559 


016426 


105014 








CLRB 


(R4) 


CONTROL TABLE 


2560 


016430 


1 1 2737 


000040 


023575 




MOVB ' 


#BIT5,TXTAB+15 




2561 


016436 


1 1 2737 


000100 


0241 76 




MOVB - 


#BIT6,TXTAB+BIT8+16 


2562 


016444 


1 1 2737 


000140 


024601 




MOVB 


#BIT6+BIT5,TXTAB+BIT9+21 


2563 


016452 


1 1 2737 


000200 


025203 




MOVB 


#BIT7,TXTAB+BIT9+BIT8+23 


2564 


016460 


1 1 2737 


000240 


025605 




MOVB 


#BIT7+BIT5,TXTAB+BIT 10+25 


2565 


016466 


112737 


000300 


026167 




MOVB 


#BIT7+BIT6,TXTAB+BIT10+BIT8+7 


2566 


016474 


112737 


000340 


026614 




. MOVB 


#BIT7+BIT6+BIT5,TXTAB+BIT10+BIT9+34 


2567 


016502 


1 1 2737 


000340 


027212 




MOVB 


#BIT7+BIT6+BIT5,TXTAB+BIT10+BIT9+BIT8+32 


2568 


016510 


1 1 2737 


000340 


027216 




MOVB 


#BIT7+BIT6+BIT5,TXTAB+BIT10+BIT9+BIT8+36 


2569 


















2570 


016516 


112737 


000040 


03Q175 




MOVB 


#BIT5,RXTAB+15 




2571 


016524 


1 1 2737 


000100 


030576 




MOVB 


#BIT6,RXTAB+BIT8+16 


2572 


016532 


1 1 2737 


000140 


031201 




MOVB 


#BIT6+BIT5,RXTAB+BIT9+21 


2573 


016540 


1 1 2737 


000200 


031603 




MOVB 


#BIT7, RXTAB+BIT9+BIT8+23 


2574 


016546 


112737 


000240 


032205 




MOVB 


#BIT7+BIT5,RXTAB+BIT 10+25 


2575 


016554 


1 1 2737 


000300 


032567 




MOVB 


#BIT7+BIT6,RXTAB+BIT10+BIT8+7 


2576 


016562 


1 1 2737 


000340 


033214 




MOVB 


#BIT7+BIT6+BIT5,RXTAB+BIT10+BIT9+34 


2577 


016570 


1 1 2737 


000340 


033612 




MOVB 


#BIT7+BITB+BIT5 , RXTAB+BIT1 0+BIT9+BIT8+32 


2578 


016576 


1 1 2737 


000340 


033616 




MOVB 


#BIT7+BIT6+BIT5,RXTAB+BIT10+BIT9+BIT8+36 


2579 


016604 


01 2705 


027560 




12$: 


MOV 


#RXBA,R5 


SET RX POINTER 


2580 


016610 


005025 








CLR 


(R5) + 


Z 


2581 


016612 


005025 








CLR 


(R5) + 


E 


2582 


016614 


005025 








CLR 


(R5) + 


R 


2583 


016616 


005025 








CLR 


(R5) + 





2584 


016620 


005025 








CLR 


(R5) + 


BUFFER! 


2585 


016622 


01 2705 


022560 






MOV ■ 


#TXBAP,R5 


L 


2586 


016626 


01 2725 








MQV 


(PC)+, (R5)+ 





2587- 


016630 


015 


016 






. BYTE 


15,16 


A 


2588 


016632 


01 2725 








MOV 


(PC)+,(R5)+ 


D 


2589 


016634 


021 


023 






.BYTE 


21,23 


T 


2590 


016636 


01 2725 








MOV 


(PC)+, (R5) + 


R 


2591 


016640 


025 


007 






.BYTE 


25,7 


A 


2592 


016642 


012725 








MOV 


(PC)+, (R5)+ 


N 


2593 


016644 


034 


032 






.BYTE 


34,32 


S 


2594 


016646 


1 1 2725 


000036 






MOVB 


#36,(R5)+. 


BUFFER 


2595 


016652 


01 0077 


162514 






MOV 


R0,@DVSRS 


LOAD LINE NO. 


2596 


016656 


032737 


004000 


001236 




BIT 


#ASYNC , STAT 


#IS THIS AN ASYNC LINE CARD? 


2597 


016664 


001406 








BEQ 


80$ 


#BR IF NOT ASYNC. 


2598 


016666 


004537 


022120 






PERFORM 


, SETREG 


#ADJUST FOR ASYNC LINE CARD 


2599 


016672 


000 


001 






. BYTE 


000,001 


#REGISTERS 


2600 


016674 


022560 








TXBAP 




#LOAD FOR ASYNC 


2601 


016676 


177767 








-9. 




# LOAD FOR ASYNC 


2602 


016700 


000405 








BR 


81$ 


#CONTINUE TEST 


2603 


016702 


004537 


022120 




80$: 


PERFORM 


, SETREG 




2604 


016706 


000 


001 






. BYTE 


000,001 


PRINCIPLE BA, BC 


2605 


016710 


0?2556 








SYNC 






2606 


016712 


177765 








-11 . 






2607 


016714 


004537 


022120 




81$: 


PERFORM 


, SETREG 




2608 


016720 


004 


005 






.BYTE 


004,005 


RX BA, BC 


2609 


016722 


027560 








RXBA 




2610 


016724 


177767 








-9. 
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261 1 


016726 


004537 


0221 20 




2612 


01 6732 


010 


01 1 




2613 


016734 


023560 






2614 


016736 


0301 60 






261 5 


01 6740 


004537 


0221 20 




2616 


01 6744 


012 


013 




261 7 


01 6746 


01 4400 






261 3 


01 6750 


000004 






2619 


01 6752 


032737 


004000 


001 2363 


2620 


01 6760 


001412 






2621 


01 6762 


004537 


0221 64 




2622 


01 6766 


020000 






2623 


01 6770 


004537 


0221 64 




2624 


01 6774 


01 5000 






2625 


01 6776 


004537 


0221 64 




2626 


017002 


072000 






2627 










2628 


01 7004 


000403 






2629 


017006 


004537 


0221 64 




2630 


017012 


034000 






2631 


017014 


005277 


1 62342 




2632 


017020 


1 05777 


1 62336 




2633 


01 7024 


100375 






2634 


017026 


01 27C t 


022560 




2635 


017032 


01 2703 


027560 




2636 


01 7036 


01 2737 


00001 1 


001 246 


2637 


01 7044 


005005 






2633 


01 7046 


005004 






2639 


01 7050 


1 1 2105 






2640 


. 01 7052 


1 1 2304 






2641 


01 7054 


O: 0504 


• 




2642 


017056 


001401 






2643 


01 7060 


1 04001 






2644 


01 7062 


005337 


001246 




2645 


01 7066 


00 1 370 






2646 


01 7070 


005005 






2647 


017072 


1 1 2777 


000007 


162274 


2648 


0171 00 


01 7704 


1 62272 




2649 


01 71 04 


00 1 401 






2650 


0171 06 


1 04001 






2651 


017110 


01 2705 


000007 




2652 


0171 14 


1 1 2777 


000014 


1 62252 


2653 


0171 22 


01 7704 


1 62250 




2654 


01 71 26 


020504 






2655 


01 71 30 


001401 






2656 


0171 32 


1 04001 






2657 


i 7 1 


1 05277 


1 62234 




2658 


017140 


017704 


162232 




2659 


017144 


020504 






2660 


017146 


001401 






2661 


017150 


104001 






2662 


017152 


104412 






2663 


017154 


104401 






2664 


017156 


005200 






2665 


017160 


005302 






2666 


017162 


001210 
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DV11 DEVICE DIAGNOSTICS, 

PERFORM i SETREG 
. BYTE 010,011 



60$: 
61$: 



3$: 



6$: 



7$: 



TXTAB 
RXTAB 
PERFORM 
.BYTE 
31*400 
BIT2 
BIT 
BEQ 

PERFORM 
BIT13 
PERFORM 



, SETREG 
012,013 



MSYNC.STAT 
60$ 

f LOAD •MODE 



.LOAD. MODE 
<BIT12+BIT11>+BIT9 
PERFORM , LOAD, MODE 
<BIT14+BIT13+BIT12>+BI 

BR 61$ 
PERFORM , LOAD. MODE 
BIT13+BIT12+BIT11 
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TX TABLE, RX TAB 



LINE PROTOCOL, LINE STATE 
31 IN HIGH BYTE 
TX GO 

01$ THIS ASYNC LINE CARD? 
//BR IF NO. 
I LOAD PARAMETERS. 
//RECEIVER ENABLE 
H 

IB BITS/PER/CHAR 
H 
T10 

; 1*9600 BAUD. 



SEG 0062 



INC 
TSTB 
BPL 
MOV 
MOV 
MOV 
CLR 
CLR 
MOVB 
MOVB 
CMP 
BEQ 
HLT 
DEC 
BNE 
CLR 
M0V9 
MOV 
BEQ 
HLT 
MOV 
. MOVB 
MOV 
CMP 
BEQ 
HLT 
INCB 
MOV 
CMP 
BEQ 
HLT 

MSTCLR 

SCQP1 

INC 

DEC 

BNE 



(PDVSCR 
GDVSCR 
.-4 

0TXBAP , R1 

#RXBA,R3 

#B. , TEMPI 

R5 

R4 

(R1 ) + ,R5 

(R3)+,R4 

R5.R4 

4$ 

1 

TEMPI 

3$ 

R5 

#7,®DVSRSH 

®DVSRA,R"4 

5$ 

1 

07, R5 

I14,@DVSRSH 

®DVSRA,R4 

R5,R4 

6$ 

1 

0DVSRSH 

0DVSRA,R4 

R5,R4 

7$ 

1 



RO 
R2 
12$ 



LOAD 

MODE AND RX ENABLE 

SET MICRO CPU GO 

WAIT FOR 

DVSCR07-1 

SET TX POINTER 

SET RX POINTER 

CHECK 9. CHAR 



SET EXPECTED 
SET FOUND 
GOOD? 



DATA COMPARE ERROR- (IS IT IDLE)? 
ALL CHARS DONE? 
BR IF NO 

SEL RX BCC REG 
READ IT 

IF RX WENT TO GOOD CNTRL BYTE} 

RX BCC S/B-0 

SET MODE-D 

SEL TX MODE REG 

READ TX MODE REG 

? 

{TX MODE N0T«7l 
;SEL RX MODE REG 
J READ IT 
5 

;RX MODE N0T*7! 
{XNIT DV11 

{LOCK ON CURRENT LINE. 
;INC LINE POINTER 
;4 LINE GROUP DONE? 
; BR IF NO 
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2667 

2663 

2669 

2670 

2671 

2672 

2673 

2674 

2675 

2676 

2677 

2678 

2679 

2680 

2681 

2682 

2663 

2684 

2685 

2686 

2687 

2688 

2689 

2690 

2691 

2692 

2693 

2694 

2695 

2696 

2697 

2698 

2699 

2700 

2701 

2702 

2703 

2704 

2705 

2706 

2707 

2708 

2709 

2710 

2711 , 

2712 

2713 

2714 

2715 

2716 

2717 

2718 

2719 

2720 

2721 

2722 



017164 000207 



PC 
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J EXIT FOR NEXT GROUP OF LINES 



SEQ 0063 



017166 
017174 
017202 
017206 
017214 
017216 
017222 
017226 
017234 
017236 
017242 
017246 
017254 
017256 
017262 
017266 
017274 
017276 
017302 
017304 
017304 
017312 
017320 
017322 
017324 
017326 
017332 
017336 
017340 
017342 
017344 
017346 
017350 
017354 
017360 
017364 



012737 
012737 
012700 
013737 
100402 
004737 
012700 
013737 
100402 
004737 
012700 
013737 
100402 
004737 
012700 
013737 
100402 
004737 
104400 

012737 
032737 
001401 
000207 
104413 
012705 
012703 
005004 
005025 
005023 
105204 
100374 
012705 
110537 
110537 
110537 



****** 
J»TEST 
;*TEST 



******************* TEST 1 6 ****************************** 

OF RECEIVER AND TRANSMITTER MULTIPLE FUNCTIONS. 
OF RECV BCC AND TRANS BCC. 

TX FUNC. 
INC/BCC 
INC/BCC 

INC/BCC/SND/DLE 
INC/BCC 
SND/DLE 
INC/BCC 

INC/BCC/SND/BCC 
NEXT MODE -7 

J * 

{♦THIS TEST IS DONE FOR BOTH ASYNC AND SYNC LINE CARDS. 
•:************************* **im********** ****************** ****** 



*CHAR 


RX FUNC. 


* 


INC/BCC 


* 1 


INC/BCC/DSCARD 


* 2 


INC/BCC 


* 3 


INC/BCC 


* 4 


NO FUNC 


* 5 


INC/BCC/DSCARD 


* 6 


INC/BCC/EXP/BCC 


* 


NEXT MODE -7 



000016 
020144 
000000 
001416 

017304 
000004 
001420 

017304 
000010 
001422 

0173C-4 
000014 
001424 



017504 

001400 



023560 
030160 



000010 
023560 
023561 
023562 



001226 

001216 



001236 



001236 



001220 
001236 



101$: 



102$: 



103$: 
105$: 



MOV 


*16,TSTN0 


MOV 


#TST17,NEXT 


MOV 


#0. ,R0' 


MOV 


LOO. 03, STAT 


BMI 


100$ 


JSR 


PC, 105$ 


MOV 


#4. ,R0 


MOV 


L04.07,STAT 


BMI 


101$ 


JSR 


PC, 105$ 


MOV ' 


#8. ,R0 


MOV 


L08. 1 1 , STAT 


BMI 


102$ 


JSR 


PC, 105$ 


MOV 


#12. ,R0 


MOV 


L12.15,STAT 


SMI 


1 03$ 


JSR 


PC, 105$ 


SCOPE 




MOV 


#3$, LOCK 


BIT 


#BIT8+BIT8,STAT 


BEQ 


.+4 


RTS 


PC 


RAMCLR 




MOV 


(f TXTAB, R5 


MOV 


0RXTAB.R3 


CLR 


R4 


CLR , 


(R5) + 


CLR 


(R3) + 


INCB 


R4 


BPL 


1$ 


MOV 


#QIT3,R5 


MOVB 


R5, TXTAB 


MOVB 


R5.TXTAB+1 


MOVB 


R5.TXTAB+2 



; PLACE LINE NUMBER INTO RO 

; LOAD LINE CARD STATUS INTO STAT 

5 BR IF LINE CARD NOT TO BE TESTED 

;G0 DO THE TEST FOR LINE CARD 1 

{PLACE LINE NUMBER INTO RO 

; LOAD LINE CARD STATUS INTO STAT 

; BR IF LINE CARD NOT TO BE TESTED 

;G0 DO THE TEST FOR LINE CARD 2 

{LOAD LINE NUMBER 

; LOAD LINE CARD STATUS INTO STAT 

{ BR IF LINE CARD NOT TO BE TESTED 

;D0 THE TEST FOR LINE CARD 3 

{LOAD LINE NO. 

{LOAD LINE CARD STATUS 

{BR IF LINE CARD NOT TO BE TESTED 

{DO THE TESTS FOR LINE CARD 4 

{SCOPE THIS TEST. 

{TEST ENTRANCE. 

{ RETURN IF SW09-1 

; "8 BITS/PER/CHAR ?" 

? BR IF YES 

{ EXIT TEST FOR THIS LINE CARD! 
{CLEAR ALL SEC REGISTERS 
{CLEAR 

{ TRANSMITTER 

{AND 

; RECEIVER 

{CONTROL 

{TABLES 

; INC/BCC IS IN R5 
{ INC/BCC 
{INC/BCC 
; INC/BCC 
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SEQ 0064 



2723 


01 7370 


152737 


000002 


023562 


2724 


01 7376 


1 1 0537 


023563 




2725 


01 74 02 


1 1 2737 


000002 


023564 


2726 


01 741 


1 1 0537 


023565 




2727 


01 741 4 


1 1 0537 


023566 




2728 


01 7420 


052737 


000344 


023566 


2729 


01 7426 


1 1 0537 


030160 




2730 


01 7432 


1 1 0537 


030161 




2731 


01 7436 


1 52737 


000020 


030161 


2732 


01 7444 


1 1 0537 


030162 




2733 


01 7450 


11 0537 


030163 




2734 


01 7454 


1 05037 


030164 




2735 


1 7460 


1 .1 0537 


030165 




2736 


01 7464 


152737 


OOOOf 3 


030165 


2737 


01 7472 


1 1 2737 


000354 


030166 


2738 


01 7500 


01 2702 


0Q0004 




2739 


01 7504 


005037 


027560 




2740 


01 751 


005037 


027562 




2741 


017514 


005037 


027564 




2742 


01 7520 


005037 


027566 




2743 


01 7524 


01 0077 


161642 




2744 


017530 


032737 


004000 


001236 


2745 


017536 


001406 






2746 


01 7540 


004537 


022120 




2747 


01 7544 


000 


001 




2748 


01 7546 


022560 






2749 


01 7550 


1 77771 






2750 


01 7552 


000405 






2751 


01 7554 


004537 


022120 




2752 


017560 


000 


001 




2753 


01 7562 


022556 






2754 


017564 


177767 






2755- 


01 7566 


004537 


022120 




2756 


017572 


004 


005 




2757 


01 7574 


027560 






2758 


017576 


177766 






2759 


01 7600 


004537 


022120 




2760 


017604 


010 


011 




2761 


01 7606 


023560 






2762 


017610 


030160 






2763 


017612 


004537 


022120 




2764 


017616 


013 


012 




2765 


017620 


000004 






2766 


01 7622 


01 00'; 1 






2767 


017624 


032737 


004000 


001236 


2768 


017632 


001412 






2769 


017634 


004537 


022164 




2770 


017640 


020000 






2771 


017642 


004537 


022164 




2772 


017646 


01 5000 






2773 


017650 


0^4537 


022164 




2774 


017654 


072000 






2775 










2776 


017656 


000405 






2777 


017660 


004537 


022164 




2778 


017664 


034000 







81$: 



BISB 

MOVB 

MOVB 

MOVB 

MOVB 

BIS ' 

MOVB 

MOVB 

BISB 

MOVB 

MOVB 

CLRB 

MOVB 

BISB 

MOVB 

MOV 

CLR 

CLR 

CLR 

CLR 

MOV 

BIT 

BEQ 

PERFORM 
. BYTE 
TXBAP 
-7. 

BR 

PERFORM 
. BYTE 
SYNC 



#BIT1 , TXTAB+2 
R5 f TXTAB+3 
#BIT1 , TXTAB+4 
R5 , TXTAB+5 
R5 , TXTAB+6 



;INC/BCC 
; SND/DLE 
; INC/BCC 
; INC/BCC 



SND/DLE 



#BIT7+BIT6+BIT5+BIT2, TXTAB+6 



R5, RXTAB 
R5 , RXTAB+1 
#BIT4,RXTAB+1 
R5 i RXTAB+2 
R5 , RXTAB+3 
RXTAB+4 
R5 , RXTAB+5 
#BIT4,RXTAB+5 



INC/BCC 
INC/BCC 

D 

INC/BCC 
INC/BCC 
NO FUNC. 
INC/BCC 



; INC/BCC SND/BCC M0D=7 



DSCARD* 



#BIT7+BIT6+BIT5+BIT3+BIT2,RXTAB+6 



#4,R2 
RXBA 
RXBA+2 
RXBA+4 
RXBA+6, 
RO.0DVSRS 
#ASYNC , STAT 
80$ 

.SETREG 
000,001 



81$ 

, SETREG 
000,001 



PERFORM 
. BYTE 
RXBA 
-10. 

PERFORM .SETREG 
. BYTE 010,011 
TXTAB 
RXTAB 
PERFORM 
.BYTE 
BIT2 

<20*400>+BIT4+BIT3+EfIT0 
BIT # ASYNC , STAT 

BEQ 60$ 
PERFORM , LOAD. MODE 
BIT13 

PERFORM , LOAD . MODE 
<BIT12+BIT11>+BIT9 
PERFORM , LOAD. MODE 
<BIT14+BIT13+BIT12>+BIT10 



, SETREG 
004,005 



.SETREG 
013,012 



SET FOR 4 LINE GROUP 
ZERO 
RX 

BUFFER 
AREA 

LOAD LINE NO. 

#IS THIS AN ASYNC LINE CARD? 

#BR IF NOT ASYNC. 

0ADJUST FOR ASYNC LINE CARD 

^REGISTERS 

# LOAD FOR ASYNC 

#LOAD FOR ASYNC 

^CONTINUE TEST 

PRINCIPLE BA, BC 



; INC/BCC EXP/BCC MODE*? 



RX BA, BC 



TX TAB,. RXTAB 



LINE STATE, LINE PROTOCOL 
TX GO 

DLE(20 HIGH BYTE) .CRC.CCITT, 
#IS THIS ASYNC LINE CARD? 
#BR IF NO. 
# LOAD PARAMETERS. 
^RECEIVER ENABLE 
# 

#8 BITS/PER/CHAR 



BR 4$ 
PERFORM , LOAD. MODE 
BIT13+BIT12+BIT11 



;#9600 BAUD. 



; LOAD 

;MODE AND RX ENABLE 
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SEQ 0065 



2779 


017666 


004537 


021706 






PERFORM 


,SETSYNC 


GET SYNC CHARS AND ADJUST 


2780 


017672 


005004 






4$: 


CLR 


R4 


LOAD 


2781 


017674 


01 2705 


022560 






MOV 


#TXBAP,R5 


TX 


2782 


017700 


1 1 0425 






5$: 


MOVB 


R4, (R5)+ 


DATA 


2783 


017702 


005204 








INC 


R4 




2784 


017704 


020427 


000007 






CMP 


R4,#7 




2785 


017710 


001373 








BNE 


5$ 




2786 


017712 


005277 


161444 






INC 


@DVSCR 


SET MICRO CODE GO 


2787 


017716 


105777 


161440 






TSTB 


@DVSCR 


WAIT FOR 


2788 


017722 


100375 








BPL 


.-4 


DVSCR07=1 


2789 


017724 


01 2701 


027560 






MOV 


#RXBA,R1 


GET RX POINTER 


2790 


017730 


01 2703 


020134 






MOV 


#50$, R3 


GET DATA EXPECTED POINTER 


2791 


017734 


01 2737 


000007 


001252 




MOV 


#7. , TEMP3 


CHECK 7 CHARS 


2792 


017742 


1 1 21 04 






6$: 


MOVB 


(R1 )+,R4 


GET RECEIVED CHAR 


2793 


017744 


1 1 2305 








MOVB 


(R3)+,R5 


GET EXPECTED CHAR 


2794 


017746 


020504 








CMP 


R5.R4 


,0K? 


2795 


017750 


001401 








BEQ 


7$ 


YES 


2796 


017752 


104001 








HLT 


1 


DATA IS WRONG! ! 


2797 


017754 


005337 


001252 




7$: 


DEC 


TEMP3 


ALL CHARS DONE? 


2798 


017760 


001370 








BNE 


6$ 


BR IF NO 


2799 


017762 


112777 


000014 


161404 




MOVB 


#14,@DVSRSH 


GET TX MODE REG. 


2800 


017770 


01 7704 


161402 






MOV 


©DVSRA.R4 




2801 


017774 


042704 


177770 






BIC 


*rC<BIT2+BIT1+Br 


0>,R4 ; CLEAR JUNK 


2802 


020000 


01 2705 


000007 






MOV 


#7,R5 


SET EXPECTED*? 


2803 


020004 


020504 








CMP 


R5 , R4 




2804 


020006 


001401 








BEQ 


8$ 




2805 


020010 


104001 








HLT 


1 


TX MODE REG N0T=7 


2806 


020012 


105277 


161356 




8$: 


I KGB 


©DVSRSH 


RX MODE REG 


2807 


020016 


01 7704 


161354 






MOV ; 


@DVSRA,R4 




2808 


020022 


042704 


177770 






BIC 


#~C<BIT2+BIT1+Br 


0>,R4 ; 


2809 


020026 


0-0504 








CMP 


R5.R4 




2810 


020030 


001401 








BEQ 


9$ 




2811 


020032 


104001 








HLT 


1 


RX MODE REG N0T*7 


2812 


020034 


1 1 2777 


000006 


161332 


9$: 


MOVB 


#6,@DVSRSH 


TX BCC REG 


2813 


020042 


01 7704 


161330 






MOV 


@DVSRA,R4 




2814 


020046 


001402 








BEQ 


10$ 




2815 


020050 


005005 








CLR 


R5 




2816 


020052 


104001 








HLT 


1 


TX BCC REG S/B=0 


2817 


020054 


105277 


161314 




10$: 


INCB 


©DVSRSH 


TXBCC 


2818 


020060 


01 7704 


161312 






MOV 


<?DVSRA,R4 




2819 


020064 


001402 








BEQ 


11$ 




2820 


020066 


005005 








CLR 


R5 




2821 


020070 


104001 








HLT 


1 


RX BCC REG S/B=0 


2822 


020072 


01 0005 






11$: 


MOV 


R0.R5 


LOAD LINE NO. 


2823 


020074 


000305 








SWAB 


R5 


PUT IN HIGH BYTE 


2824 


020076 


052705 


050000 






BIS 


#BIT14+BIT12,R5 


SET BCC COMPLETE 


2825 


020102 


01 7704 


161260 






MOV 


@DVRIC,R4 


READ RIC 


2826 


0201 06 


020504 








CMP 


R5.R4 


2827 


0201 10 


001401 








BEQ 


12$ 




2828 


0201 12 


104001 








HLT 


1 


DVRIC INCORRECT 


2829 


0201 14 


104413 






12$: 


RAMCLR 




CLEAR ALL SEC REGS 


2830 


0201 16 


104401 








SC0P1 




RETURN WITH SAME LINE 


2831 


020120 


005200 








INC 


RO 


UPDATE LINE POINTER 


2832 


020122 


005302 








DEC 


R2 


4 LINES DOKlE? 


2833 


020124 


001402 








BEQ 


.+6 


BR IF NO 


2834 


020126 


000137 


017504 






JMP 


3$ 


JMP IF YES 
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2835 
2335 
2S37 
2S38 
2839 
2840 
, 2141 
2842 
2§43 
2844 
2345 
2846 
2847 
2348 
2349 
2850 
2351 
2852 
2353 
2354 
2355 
2356 
2857 
2858 
2359 
2660 
2861 
2362 
2863 
2864 
2865 
2866 
2367 
2868 
2369 
2870 
2871 
2S72 
2373 
2874 
2375 
2376 
2877 
237S 
2879 
2880' 
2831 
2832 
2883 
2884 
2335 
2836 
2887 
2888 
2889' 
2890 



020132 


000207 




020134 


000 


020 


020136 


002 


003 


020140 


0P,0 


004 


020142 


006 


000 



50$: 



RTS 
. BYTE 
. BYTE 
. BYTE 
. BYTE 



PC 

0,20 
2,3 
20,4 
8,0 



TEST 17 



i*********************** TEST 17 ****************************** 

TEST OF RECEIVER RESYNC 
TEST TO TRANSMITT A BLOCK OD 
DATA (SYN,SYN, 1 ,2,3,4,5) 

HAVING CHAR 11 1 " BEING A "SPECIAL CHAR" TO THE RECEIVER 

AT WHICH TIME A "RE-SYNC " PULSE WILL BE ISSUED 

AND A RESTART CHAR PROC. (DVSCR08-1) WILL BE DONE. 

WHEN THE TRANSMITTER IS DONE (DVSCR1,5-1) A SECOND 

BLOCK OF DATA (SYN,SYN,SYN,SYN,6,7, 10) 

WILL BE SENT EXPECTING THAT THE NEXT TIME DVSCR07-1 

THAT THE DVRIC WILL HAVE: 

14«1 11:08«LINE NO. 07:00« "10" 

RXBUFPER (CORE) S/B- 1,6,7,10. 

THIS TEST IS DONE FOR BOTH ASYNC AND SYNC LINE CARDS. 

* m * * * * * * * * * * # * * hi * * * * * # * * # * * * * * * * * * * + * * * * * it********************** 



020144 


012737 


000017 


001228 


TST17J 


MOV 


#17,TSTN0 




020152 


01 2737 


021142 


001216 




MOV 


0TST2O,NEXT 




020160 


01 2700 


000000 






MOV 


//0. f R0 


{PLACE LINE NUMBER INTO RO 


020164 


013737 


001416 


001238 




MOV 


LOO. 03, STAT 


{LOAD LINE CARD STATUS INTO STAT 


020172 


100402 








BMI 


100$ 


5 BR IF LINE CARD NOT TO BE TESTED 


020174 


004737 


020262 






JSR 


PC, 105$ 


J GO DO THE TEST FOR LINE CARD 1 


020200 


012700 


000004 




100$: 


MOV 


HA. ,R0 


; PLACE LINE NUMBER INTO RO 


020204 


013737 


001420 


001236 




MOV 


L04.07.STAT 


{LOAD LINE CARD STATUS INTO STAT 


020212 


100402 








BMI 


101$ 


{BR IF LINE CARD NOT TO BE TESTED 


020214 


004737 


02026? 






JSR 


PC, 105$ 


{GO DO THE TEST FOR LINE CARD 2 


020220 


01 2700 


000010 




101$: 


MOV 


*0. ,R0 


{LOAD LINE NUMBER 


020224 


013737 


001422 


001236 




MOV 


LOB. 1 1 , STAT 


{ LOAD LINE CARD STATUS INTO STAT 


020232 


100402 








BMI 


102$ 


{BR IF LINE CARD NOT TO BE TESTED 


020234 


004737 


020262 






JSR 


PC, 105$ 


{DO THE TEST FOR LINE CARD 3 


020240 


01 2700 


000014 




102$: 


MOV 


//12..R0 


{LOAD LINE NO. 


020244 


01 3737 


001424 


001236 




MOV 


L12.15,STAT 


{ LOAD LINE CARD STATUS 


020252 


100402 








BMI 


103$ 


{BR IF LINE CARD NOT TO BE TESTED 


020254 


004737 


020262 






JSR 


PC, 105$ 


{DO THE TESTS FOR LINE CARD 4 


020260 


104400 






103$: 


SCOPE 




{SCOPE THIS TEST. 


020262 








105$: 






{TEST ENTRANCE. 


020262 


012737 


020314 


001220 




MOV 


<M$,LQCK 


{SET RETURN 


020270 


104413 








RAMCLR 




{CLEAR ALL SEC. REGS 


020272 


112737 


000001 


030181 




MOVB 


#BITO , RXTAB+1 


{ SET "SPECIAL CHAR" CNTRL BYTE, 


020300 


006037 


030166 






CLR 


RXTAB+6 


{CLEAR 


020304 


005037 


030170 






CLR 


RXTAB+1 


{OTHER CNTRL BYTES 


020310 


01 2702 


000004 






MOV 


#4,R2 


{SET FOR 4 LINE GROUP 


020314 


01 0077 


161052 




1$: 


MOV 


RO.0DVSRS 


{LOAD LINE NUMBER 


020320 


032737 


004000 


001238 




BIT 


iCASYNC, STAT 


{#IS THIS AN ASYNC LINE CARD? 


020326 


001406 








BEQ 


80$ 


}*BR IF NOT ASYNC. 


020330 


004537 


022120 






PERFORM 


.SETREG 


{^ADJUST FOR ASYNC LINE CARD 


020334 


000 


001 






. BYTE 


000,001 


{//REGISTERS 


020336 


022560 








TXBAP 




;#LQAD FOR ASYNC 
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-5 

iR 81$ 
80$; PERFORM , SETREG 
. BYTE 000,001 
SYNC 
-7 * 

81$: PERFORM .SETREG 
. BYTE 004,005 



2891 


020340 


177773 




2892 


020342 


000405 




2693 


020344 


004537 


022120 


2894 


020350 


000 


001 


2895 


020352 


022556 




2896 


020354 


•177771 




2897 


020356 


004537 


022120 


2898 


020362 


004 


005 


2899 


020364 


027560 




2900 


020366 


177774 




2901 


020370 


004537 


022120 


2902 


020374 


010 


011 


2903 


020376 


023560 




2904 


020400 


030160 




2905 


020402 


004537 


022120 


2906 


020406 


013 


012 


2907 


020410 


000004 




2908 


020412 


000101 




2909 


020414 


032737 


004000 


2910 ' 


020422 


001412 




291 1 


020424 


004537 


022164 


2912 


020430 


020000 




2913 


020432 


004537 


022164 


2914 


020436 


01 5000 




2915 


020440 


004537 


022164 


2916 


020444 


07200Q 




2917 








2918 


020446 


000403 




2919 


020450 


004537 


022164 


2920 


020454 


034000 




2921 


020456 


005037 


027560 


2S22 


020462 


005037 


027562 


2923 


020466 


012705 


022560 


2924 


020472 


005004 




2925 


020474 


005204 




2926 


020476 


1 10425 




2927 


020500 


022704 


000005 


2928 


020104 


001373 




2929 


020506 


004537 


021706 


2930 


020612 


005277 


160644 


2931 


020516 


005005 




2932 


020520 


105777 


166636 


2933 


020524 


100404 




2934 


020526 


104414 




2935 


020530 


005205 




2936 


020532 


001372 




2937 


020534 


104000 




2938 


020536 


005005 




2939 


020540 


005777 


160618 


2940 


020544 


100404 




2941 


020546 


104414 




2942 


020550 


005205 




2943 


020552 


001372 




2944 


020554 


104000 




2945 


020556 


012705 


022560 


2946 


020562 


113725 


001236 
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*, LOAD FOR ASYNC 
{ H CONTINUE TEST 



60$: 
61$: 



RXBA 
-4 

PERFORM , SETREG 
. BYTE 010,011 
TXTAB 
RXTAB 

PERFORM , SETREG 
. BYTE 013,012 
BIT2 

BIT6+BIT0 

BIT #ASYNC, STAT 

BEQ 60$ 
PERFORM .LOAD. MODE 
BIT13 

PERFORM , LOAD. MODI 
<BIT12+BIT11>+BIT9 
PERFORM .LOAD. MODE 
<BIT14+BIT13+BIT12>+BIT1 



;RX BA P, RX BC P 



;RX BA RX BC 



}RX CNTRL TAB, RX CNTRL TAB 



BR 

PERFORM 
BIT13+BI 

CLR ., 

CLR 

MOV 

CLR 

INC 

MOVB 

CMP 

1NE 

PERFORM 

INC 

CLR 

TSTB 

BMI 

DELAY 

INC 

BNE 

HLT 

CLR 

TST 

BMI 

DELAY 

INC 

BNE 

HLT 

MOV 

MOVB 



, LOAD. MODE 
T12+BIT11 
RXBA 
RXBA+2 

//TXBAP, R5 
R4 

R4 

R4,(RB)+ 
*8,R4 

2$ 

,5ETSYNC 

0DVSCR 
RB 

ODVSCR 

.+12 

R5 
.-12 

R5 

ODVSCR 
.+12 

RB 

.-12 



; LINE STATE, LINE PROTOCOL PARAMS. 
;TX GO 

{TX.DDCMP, IDLE MARK 
;#IS THIS ASYNC LINE CARD? 
;*BR IF NO. 
i#LOAD PARAMETERS. 
{^RECEIVER ENABLE 
{# 

{#8 BITS/PER/CHAR 

\H 


{#9600 BAUD. 

{ LOAD 
. {MODE + RX ENABLE 
{CLEAR 
;RX BUFFER 
{ SET TX POINTER 
{LOAD 
{ DATA 
; INTO 

{TX BUFFER 
;(1-5) 

{GET SYNC CHARS AND ADJUST FOR ONI OR TWO. 

5 SET UCPU GO . 
{SET COUNTER TO 
{WAIT FOR DVSCR07-1 
{BR IF SET. 
{STALL TIME 
{UPDATE 
{WAIT 

{ DVSCR07 NOT SET. 

{ SET COUNTER TO 

{TX DONE? 

{BR IF DVSCR1 B«1 

{STALL TIME 

{UPDATE 



#TXBAP,RB 
STAT,(R5)* 



DVSCR15 NOT SET. 
SET TX POINTER 

SYNC . . 
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SEQ 0068 



2947 


020566 


1 1 3725 


001 236 






MQVB 


C T A T /DCY-1- 

5TAT , ( KO J + 




2948 


020572 


01 2704 


000006 






MOV 






2949 


020576 


1 1 0425 






3$ : 


MQVB 


R4 , I Ro ; + 




2950 


020600 


005204 








INC 


R4 


DATA 


2951 


020602 


022704 


00001 1 










ALL UUIN u f 


2952 


020606 


00 1 373 








BNE 


3$ 


BR IF NO 


2953 


020610 


032737 


004000 


001236 




BIT 


# ASYNC , STAT 


iic TUTC AM ACVMP 1 TKIP f ADr»"> 


2954 


020616 


001406 








BEQ 


82$ 


ffDK If IMU 1 A J I Nv< > 


2955 


020620 


004537 


0221 20 






PERFORM 


, SET REG 


^ADJUST FOR ASYNC LINE CARD 


2956 


020624 


000 


001 






. BYTE 


nnn aim 
UUU , OU 1 


rr K U.U 1 D I ELKO 


2957 


020626 


022562 








TXBAP+2 




ff LUAU rUK AbYNu 


2958 


020630 


177775 








-3 




ft LUAD rUR ASYNC 


2959 


020632 


000405 








BR 


83$ 


ffCUNTINUE TEST 


2960 


020634 


004537 


022120 




82$: 


PERFORM 


, SETREG 




2961 


020640 


000 


001 






. BYTE 


000 , 00 1 


TV DA B TV D O D 

TX BA P, IX Be r 


2962 


020642 


022556 








sync 






2963 


020644 


177771 








-7 






2964 


020646 


032737 


004000 


001 236 


83$ : 




jitCVMO CTaT 


ffMDTNL- Line L.MMU 


2965 


020654 


001403 










* + }.® 


U CJD tc un 

ft an it V4U 


2966 


020656 


004537 


0221 64 






PERFORM 


, LOAD • MODE 


juOI Cad ny CKIADI C 

ffCLEAR RX ENABLE 


2967 


020662 


000000 











■ 


# 


2968 


020664 


1 1 2777 


000013 


1 60502 




MOVB 


#13 r @>DVSRSH 


LINE STATE 


2969 


020672 


042777 


000200 


1 60476 




BIC 


#BIT7 ,@DVSRA 


i cAn iiiicc ccr* taqi ecu 
CLEAR USE SEC TABLES 


2970 


020700 


0527": 7 


000002 


1 60470 




BIS 


ft Bl T 1 , (PDVSRA 


GCT DC-CVMP 

St 1 R t SYNC 


2971 


020706 


1 1 2777 


000012 


1 60460 




MOVB 


#12 f @DV$RSH 


SEL LINE PROTOCOL PARAM. 


2972 


020714 


052777 


000002 


1 60454 




BIS 


#BIT1 , @DVSRA 


CCT CTOTD 1 e A r% T III /** CX/M/^ 

SET STRIP LEADINCa SYNC 


2973 


020722 


01 2737 


006000 


020732 




MOV 


#6000 , 84$ 


GIVE UCPU TIME 


2974 


020730 


005327 








DEC 


(PC) + 


TO RESYNC SILO 


2975 


020732 


000000 






84$ : 









2976 


020734 


001 375 








BNE 


. —4 




2977 


020736 


072737 


004000 


001236 




BIT 


#ASYNC,STAT 


#ASYNC LINE CARD? 


2978 


020744 


001403 








BEQ 


.+10 


ffBR IF NOT ASYNC LINE CARD. 


2979 


020746 


004537 


022164 






PERFORM 


, LOAD . MODE 


#SET RX ENABLE FOR ASYNC LINE 


2980 


020752 


020000 








BIT1 3 




#RX ENABLE 


2981 


020754 


1 1 2777 


000013 


1 60412 




MOVB 


#13 r @DVSR5H 


SEL LINE STATE. 


2982 


020762 


052777 


000004 


160406 




BIS 


#BIT2,@DVSRA 


SET TX GO. 


2983 


020770 


052777 


000400 


160364 




BIS 


#BIT8 , ©DVSCR 


RESTART CPU 


2984 


020776 


005004 








CLR 


R4 


SET FOR TIME OUT. 


P985 


021 000 


1 5777 


1 60356 






TSTB 


©DVSCR 


RX UUNEr 


2986 


021 004 


1 00404 








BMI 


.+1 2 


BR IF YE5 


2987 


021 006 


1 0441 4 








DELAY 




WASTE TIME 


2988 


021010 


005204 








INC 


R4 


LOOP DONE? 


2989 


021012 


00 1 372 








BNE 


. ~1 2 


BR I r NU 


2990 


021 01 4 


1 04000 








HLT 




DVSCR07 NUT SET AFTER RESYNC. 


2991 


021 016 


01 7704 


1 60344 






MOV 




.REAU UVR1C 


2992 


021 022 


1 0005 










R5* R5 


LOAD LINE NO 


2993 


021024 


000305 








SWAB 




PLACE IN HIGH BYTE 


2994 


021 026 


052705 


040010 






BIS 


#BIT14+10,R5 


SET BC WARNING + CHAR 10 


2995 


021032 


020504 








CMP 


R5.R4 


RIC OK 


2996 


021034 


001401 








BEQ 


4$ 




2997 


021036 


104001 








HLT 


1 


DVRIC WRONG 


2998 


021 040 


01 2703 


027560 




4$: 


MOV 


#RXBA,R3 


CHECK RX DATA 


2999 


021 044 


1 1 2304 








MOVB 


(R3)+,R4 




3000 


021 046 


01 2705 


000001 






MOV 


#1 ,R5 




3001 


021052 


020504 








CMP 


R5.R4 




3002 


021054 


001401 








BEQ 


5$ 
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3003 

3004 

3005 

3006 

3007 

3008 

3009 

3010 

301 1 

3012 

3013 

3014 

3015 

3016 

3017 

3018 

3019 

3020 

3021 

3022 

3023 

3024 

3025 

3026 

3027 

3028 

3029 

3030 

3031 

3032 

3033 

3034 

3035 

3036 

3037 

3038 

3039 

3040 

3041 

3042 

3043 

3044 

3045 

3046 

3047. 

3048 

3049 

3050 

3051 

3052 

3053 

3054 

3055 

3056 

3057 

3058 



021056 
021060 
021062 
021066 
021070 
021072 
021 074 
021076 
021 1 02 
021 104 
021 106 
021 1 10 
0211 12 
021 114 
021 1 16 
021120 
021 122 
021 124 ' 
021 126 
021 130 
021 132 
021 134 
021140 



021 142 
021 150 
021 156 
021 1 62 
021 170 
021 176 
021200 
021204 
021210 
021216 
021224 
021226 
021232 
021236 
021244 
021252 
021254 
021260 
021264 



104001 
11 2304 
01 2705 
020504 
001401 
104001 
1 1 2304 
01 2705 
020504 
001401 
104001 
005205 
1 1 2304 
020504 
001401 
104001 
104412 
104401 
005200 
005302 
001402 
000137 
000207 



01 2737 
012737 
01 2700 
1 1 3737 
013737 
100402 
004737 
01 2700 
1 1 3737 
01 3737 
100402 
004737 
012700 
113737 
01 3737 
100402 
004737 
01 2700 
113737 



HLT 


1 




MOVB 


(R3) + 


R4 


MOV 


#6,R5 




CMP 


R5.R4 




BEQ 


6$ 




HLT 


1 




MOVB 


(R3) + 


R4 


MOV 


#7,R5 




CMP 


R5.R4 




BEQ 


7$ 




HLT 


1 




INC 


R5 




MOVB 


(R3) + 


R4 


CMP 


R5,R4 




BEQ 


8$ 




HLT 


1 




MSTCLR 






SC0P1 






INC 


R0 




DEC 


R2 




BEQ. 


.+6 




JMP 


1$ 




RTS 


PC 
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1ST CHAR NOT "1"! 



SEQ 0069 



2ND CHAR NOT "6" I 



3RD CHAR NOT " 7 " I 



4TH CHAR NOT "10"! 
RESET DV11 

LOCK ON CURRENT LINE? 
UPDATE LINE NO. 
4 LINES DONE 
BR IF YES 
JMP IF NO 

EXIT FOR NEXT 4 LINE GROUP 

************************ TEST 20 ************************ 
*TEST OF RECEIVER OVERRUN. 
*TEST TO TXMIT 134. CHARS AND RECV 129 
♦SERVICEING THE FIRST CHAR AS A SPECIAL CHAR 
*AND STOPING THE CHAR PROCESSOR. 
*WHEK THE TRANSMITTER FINISHES ALL 134. CHARS 
*THE RECEIVER IS RESTARTED AND THE NEXT ENTRY 
*IN THE RIC REG S/B OVER RUN ON CHAR 202(8). 
*THIS TEST IS DONE FOR BOTH ASYNC AND SYNC LINE CARDS. 
:******************************************* 



******************* 



000020 


001226 


TST20 : 


MOV 


#20,TSTN0 


002436 


001216 




MOV 


#.E0P,NEXT 


000000 






MOV 


#0. ,R0 


001406 


001244 




MOVB 


MASK . A ,MASKX 


001416 


001236 




MOV 


L00. 03, STAT 






BMI 


100$ 


021310 






JSR 


PC, 105$ 


000004 




100$: 


MOV 


#4. ,R0 


001407 


001244 




MOVB 


MASK. B ,MASKX 


001420 


001236 




MOV 


L04.07.STAT 








BMI 


101$ 


021310 






JSR . 


PC, 105$ 


000010 




101$: 


MOV 


#8. ,R0 


001410 


001244 




MOVB 


MASK.C.MASKX 


001422 


001236 




MOV 


L08 .11, STAT 








BMI 


102$ 


021310 






JSR 


PC ,105$ 


000014 




102$: 


MOV 


#12. ,RO 


001411 


001244 




MOVS 


MASK.D.MASKX 



; PLACE LINE NUMBER INTO R0 

; PLACE "MASK" FOR CHARS INTO MASKX 

; LOAD LINE CARD STATUS INTO STAT 

; BR IF LINE CARD NOT TO BE TESTED 

;G0 DO THE TEST FOR LINE CARD 1 

; PLACE LINE NUMBER INTO RO 

; GET MASK 

; LOAD LINE CARD STATUS INTO STAT 
;BR IF LINE CARD NOT TO BE TESTED 
;G0 DO THE TEST FOR LINE CARD 2 
; LOAD LINE NUMBER 
:GET MASK 

; LOAD LINE CARD STATUS INTO STAT 
;BR IF LINE CARD NOT TO BE TESTED 
;DO THE TEST "FOR LINE CARD 3 
; LOAD LINE NO. 
; GET MASKK 
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3059 


021272 


01 3737 


001424 


001236 


3030 


021300 


1 00402 






3031 


021302 


004737 


021310 




3062 


021306 


i W *f *r u u 






3083 


021310, 






001220 


30§4 


021310 


01 2737 


021 343 


,3081 


021316 








30S6 


021320 


006004 






3067 


021322 


01 2705 


030160 




3068 


021326 


0C5025 






3069 


021330 


1 05204 






3070 


021332 


1 00375 




030161 


3071 


021334 


1 1 2737 


000001 


3072 


021342 


01 2702 


OOOOCl 




3073 


021346 


01 0077 


160020 


001236 


3074 


021352 


032737 


004000 


3075 


021360 


001406 






3076 


021362 


004537 


022120 




3077 


021366 


000 


001 




3078 


021370 


022560 






3079 


021372 


1 77573 






3080 


021374 


000405 






3081 


021376 


004537 


022120 




3082 


021402 


000 


001 




30S3 


021404 


022556 






3084 


021406 


1 77572 






3035 


021410 






001236 


3036 


021410 


032737 


004000 


3087 


021416 


001406 






3083 


021420 


004537 


022120 




3039 


021424 


004 


005 




3090 


021426 


027560 






3091 ' 


021430 


1 77576 






3092 


021432 


000405 






3093 


021434 


004537 


022120 




3094 


021440 


004 


005 




309S 


021442 


027560 






3096 


021444 


1 77S77 






3097 


021446 


004537 


022120 




309S 


021482 


010 


01 1 




3099 


021454 


023560 






3 tOO 


021456 


0301 60 






3101 


021460 


004537 


022120 




3102 


021464 


> 3 


012 




3103 


021466 


000004 






3104 


021470 


000101 






3105 


021472 


032737 


004000 


001236 


3106 


021500 


001412 






3107 


021502 


004537 


022164 




310S 


021506 


020000 






3109 


021510 


004537 


022164 




3110 


021514 


01 5000 






3111 


021516 


004537 


022164 




3112 


021522 


072000 






3113 










3114 


021524 


000403 
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103$: 
105$: 



81$: 



02$: 



MOV 


L12.15.STAT 


BMI 


103$ 


USA 


PC , 1 05$ 


SCOPE 




MOV ' 


#1$,LQCK 


RAMCLR 




CLR 


R4 


MOV 


IRXTABt R5 


CLR 


(RB) + 


INCB 


R4 


BPL 


.-4 


MOVB 


0BITO.RXTAB+1 


MOV 


fV4,R2 


MOV 


RO,QDVSRS 


BIT 


ASYNC i STAT 


BEQ 


80$ 


PERFORM 


, SETREG 


. BYTE 


000,001 


TXBAP 




-133. 




BR 


81$ 


PERFORM 


, SETREG ' 


. BYTE 


000,001 


SYNC 




-134. 
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; LOAD LINE CARO STATUS 
;3R IP LINE CARD NOT TO BE TESTED 
{DO THE TESTS FOR LINE CARD 4 
; SCOPE THIS TEST. 
; TEST ENTRANCE. 
J RETURN FOR SW09 
(CLEAR ALL SEC REGISTERS 
; CLEAR 
{THE 

; RECEIVER 
; CONTROL 
; TABLE 

(SET "SPECIAL CHAR" ( 1 ) 
;4 LINE GROUP , 
; LOAD LINE NO. 

;#XS THIS AN ASYNC LINE CARD? 
(*BR IF NOT ASYNC. 
;*ADJUST FOR ASYNC LINE CARD 
^REGISTERS 
jtfLOAD FOR ASYNC 
;*LOAD FOR ASYNC 
(/^CONTINUE TEST 

? TX BA P, TX BC P 



BIT , ASYNC, STAT 
BEQ 82$ 
PERFORM , SETREG 
. BYTE 004,005 
RXBA 
-130. 

BR 03$ 
PERFORM .SETREG 
.BYTE 004,005 
RXBA 
— 129. 

PERFORM , SETREG 
, BYTE 010,011 
TXT'AB 

RXTAB 

PERFORM , SETREG 
. BYTE 013,012 
BIT2 

BIT6+BIT0 

BIT 0ASYNCSTAT 
BFQ 60$ 
PERFORM , LOAD .MODE 
BIT13 

PERFORM , LOAD. MODE 
<BIT12+BIT11>+BIT9 
PERFORM , LOAD. MODE 
<BIT14+BIT13+BIT12>4 



;nS THIS AN ASYNC LINE CARD? 

(*BR IF NOT ASYNC. 

jtf ADJUST FOR ASYNC LINE CARD 

(^REGISTERS 

;#LOAD FOR ASYNC 

;#LOAD FOR ASYNC 

(#CQNTINUE TEST 

?RX BA, RX BC 

1 



BR 



81$ 



{ TX TAB,' RX TAB, 

; ' 

LINE STATE, LINE PROTOCOL PARAM 
TX GO 

TX DDCMP + IDLE MARK 
HIS THIS ASYNC LINE CARD? , 
#BR IF NO. 
0LQAD PARAMETERS. 
^RECEIVER ENABLE 
H 

08 BITS/PER/CHAR 
# 

BIT10 

(#9600 BAUD. 
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3115 


021526 


004537 


022164 




60$: 


PERFORM 


, LOAD. MODE 


LOAD 


31 16 


021532 


034000 








8IT13+BIT12+S1T11 


MODE 


3117 


021534 


012705 


022560 




61$: 


MOV 


//TXBAP, R5 


LOAD 


3118 


021540 


005004 








CLR 


R4 


TX 


3119 


021542 


105204 






2$: 


INCB 


R4 


DATA 


3120 


021544 


001402 








BEQ 


21$ 


BUFFER 


3121 


021546 


110425 








MOVB 


R4,(R5)+ 




3122 


021550 


000774 








BR 






3123 


021552 


004537 


021706 




21$: 


PERFORM 


, SETSYNC 


GET SYNC CHARS AND ADJUST FOR ONE OR TWO 


3124 


021556 


005277 


157600 






INC 


©DVSCR 


SET UCPU GO 


3125 


021562 


105777 


157574 






TSTB 


•DVSCR 


DVSCR07-1? 


3126 


021586 


100375 








BPL 


.-4 


BR IF NO 


3127 


021570 


005777 


157566 






TST 


©DVSCR 


DVSCR1 5*1 ? 


3128 


021574 


100375 








BPL 


.-4 


BR IF NO 


3129 


021176 


1 1 2777 


000012 


1B7S70 




MOVQ 


//12,@DVSRSH 


LINE PROTOCOL PARAM. 


3130 


021804 


0B2777 


000040 


157564 




BIS 


#BXT5,6DVSRA 


SET RX DDCMP 


3131 


021612 


052777 


000400 


157542 




BIS 


#BIT8,«VSCR 


RESTART 


3132 


021620 


105777 


157536 






TSTB 


©DVSCR 


DVSCR07-1? 


3133 


021624 


100375 








BPL 


.-4 


BR IF NO 


3134 


021626 


01 7704 


157534 






MOV 


QDVRIC,R4 


READ RIC 


3135 


021632 


01 0005 








MOV 


R0,R5 


LINE 


3136 


021634 


000305 








SWAB 


R5 


HIGH BYTE 


3137 


021636 


052705 


020202 






BIS 


#BIT13+202,R5 


130. 


3138 


021642 


0327o7 


004000 


001236 




BIT 


# ASYNC, STAT 


«IS THIS AN ASYNC LINE CARD? 


3139 


021650 


001401 








BEQ 


.+4 


«BR IF NOT ASYNC 


3140 


021652 


005205 








INC 


R5 


//ADJUST FOR ASYNC. DOUBLE BUFFER CAUSES 


3141 
















ICHAR TO BE ONE MORE THAN SYNC LINE CARD 


3142 


021654 


143705 


001244 






BICB 


MASKX.RS 


CLEAR UNUSED BITS 


3143 


021660 


020504 








CMP 


R5,R4 


RIC OK? 


3144 


021662 


001401 








BEQ 


3$ 




3145 


021664 


1.4001 








HLT 


1 


NO OVER-RUN; OR ON WRONG CHAR t 


3146 


021666 


104412 






3$: 


MSTCILR 




RESET DVA 


3147 


021670 


104401 








SC0P1 




LOCK ON CURRENT LINE? 


3148 


021672 


005200 








INC 


RO 


UPDATE LINE NO. 


3149 


021674 


005302 








DEC 


R2 


4 LINES DONE 


3150 


021676 


001402 








BEQ 


.+0 


BR IF YES 


3151 


021700 


000137 


021346 






JMP 


1$ 


JMP IF YES 


3152 


021704 


000207 








RTS 


PC 


EXIT 


3153 


















3154 


021706 








SETSYNC: 






3155 


021706 


113737 


001236 


022556 




MOVB 


STAT .SYNC 


SET SYNC FOR THIS LINE. 


3156 


021714 


113737 


022556 


022557 




MOVB 


SYNC,SYNC«M (PLACE SYNC IN HIGH BYTE 


3157 


021722 


032737 


010000 


001236 




BIT 


* TWOS YN, STAT (ONE SYNC OR TWO? 


315S 


021730 


001402 








BEQ 


1$ 


BR IF JUMPERED FOR TWO. 


3159 


021732 


105037 


022556 






CLRB 


SYNC (SET FIRST SYNC TO NON-SYNC 


3160 


021736 


000205 






1$: 


EXIT 






3161 


021740 


01 0046 






SIMBCC: 


MOV 


RO,-(SP) 




3162 


021742 


01 0146 








MOV 


R1 ,-(SP) 




3163 


021744 


01 0246 








MOV 


R2,-(SP) 




3164 


021746 


01 2537 


001246 






MOV 


(R5)+, TEMPI 




3165 


021752 


012537 


001250 






MOV 


(R5)+,TEMP2 




3166 


021756 


012537 


001252 






MOV 


(R5)+, TEMPS 




3167 


021762 


005037 


022114 




1$: 


CLR 


BCCFBK 




3168 


021766 


01 3700 


0012b2 






MOV 


TEMPS , RO 




3169 


021772 


006037 


001250 






ROR 


TEMP2 




3170 


021776 


005S00 








ADC 


RO 
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SEQ 0072 



3171 


022000 


032700 


000001 




BIT 


0BITO , RO 


3172 


022004 


001402 






BEQ 


2$ 


3173 


022006 


005137 


0221 14 




COM 


BCCFBK 


3174 


022012 


01 370 


0221 12 




2$: MOV 


XPOLY , RO 


3175 


022016 


005100 






COM 


RO 


3176 


022020 


040037 


0221 14 




BIC 


RO, BCCFBK 


3177 


022024 


000241 






CLC 




3178 


022026 


006037 


001252 




ROR 


TEMP3 


3179 


022032 


01 3700 


022114 




MOV 


BCCFBK, RO 


3180 


022036 


01 3701 


001252 




MOV 


TEMP3.R1 


3181 


022042 


01.0102 






MOV 


R1.R2 


3182 


022044 


04 0100 






BIC 


R1 ,R0 


3183 


022046 


043702 


022114 




BIC 


BCCFBK, R2 


3184 


022052 


050200 






BIS 


R2.R0 


3185 


022054 


043737 


022112 


001252 


BIC 


XPOLY, TEMP3 


3186 


022062 


050037 


001252 




BIS 


RO , TEMP3 


3187 


022066 


005337 


001246 




DEC 


TEMPI 


3188 


022072 • 


001333 






BNE 


1$ 


3189 


022074 


01 3737 


001252 


0221 16 


MOV 


TEMP3, CALBCC 


3190 


0221 02 


01 2602 






MOV 


(SP)+,R2 


3191 


0221 04 


01 2601 






MOV 


(SP)+,R1 


3192 


022106 


01 2600 






MOV 


(SP)+,RO 


3193 


0221 10 


000205 






RTS 


R5 


3194 


0221 12 


000000 






XPOLY: 




3195 


0221 14 


000000 






BCCFBK: 




3196 


0221 16 


oooooo 






CALBCC: 




3197 




000200 






LRC8=200 




3198 




120001 






CRC16=120001 




3199 




102010 






CRC.CCITT=102010 


3200 














3201 














3202 


0221 20 


01 0046 






SETREG: MOV 


RO,-(SP) 


3203 


0221 22 


01 0146 






MOV 


R1 ,-<SP) 


3204 


0221 24 


1 1 2500 






MOVB 


(R5)+,R0 


3205 


022126 


1 1 2501 






MOVB 


(R5)+,R1 


3206 


0221 30 


11 0077 


157240 




MOVB 


RO,@DVSRSH 


3207 


022134 


01 2577 


157236 




MOV 


(R5)+,@DVSRA 


3208 


022140 


042777 


000060 


157214 


BIC 


#BIT5+BIT4,@DVSCR 


3209 


022146 


1 1 0177 


157222 




MOVB 


R1 ,<S>DVSRSH 


3210 


022152 


01 2577 


157220 




MOV 


(R5)+,@DVSRA 


3211 


022156 


01 2601 






MOV 


(SP)+,R1 


3212 


022160 


01 2600 






MOV 


(SP)+,RO 


3213 


022162 


000205 






EXIT 




3214 














3215. 


022164 








LOAD. MODE: 




3216 


0221 64 


012577 


157200 




MOV 


(R5)+,@DVLCR 


321 7 


0221 70 


052777 


1 00000 


1 571 72 


BIS 


#BIT15,@DVLCR 


3218 


022176 


01 0046 






MOV 


RO.-(SP) 


3219 


022200 


005000 






CLR . 


RO 


3220 


022202 


005777 


157162 




1$: TST 


©DVLCR 


3221 


022206 


100004 






BPL 


2$ 


3222 


022210 


104414 






DELAY 




3223 


022212 


005200 






INC 


RO 


3224 


022214 


001372 






BNE 


1$ 


3225 


022216 


104000 






HLT 


;BIT 


3226 


022220 


01 2600 






2$: MOV 


(SP)+,RO 



;BIT 15 FAILED TO CLEAR 
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3227 


022222 


000205 








EXIT 






3228 


















3229 












;SUBROUTINE. 




3230 












;CORE TABLES ALREAY SET 


UP 


3231 












;XMIT 3 


CHARS 2SYNC+ 1 


DATA 


3232 












; RCV " 


1 CHAR 




3233 


022224 


01 0077 


157142 




DV1 10N: 


MOV 


RO,@DVSRS 




3234 


022230 


032737 


004000 


001236 




BIT 


#ASYNC, STAT 


;#IS THIS AN ASYNC LINE CARD? 


3235 


022236 


001406 








BEQ 


60$ 


;#BR IF NOT ASYNC. 


3236 


022240 


0C4537 


022120 






PERFORM 


, SETREG 


;#ADdUST FOR ASYNC LINE CARD 


3237 


022244 


000 


001 






.BYTE 


000,001 


{^REGISTERS 


3238 


022246 


022560 








TXBAP 




J # LOAD FOR ASYNC 


3239 


022250 


177777 








-1 




;#LOAD FOR ASYNC 


3240 


022252 


000405 








BR 


81$ 


; ^CONTINUE TEST 


3241 


022254 


004537 


022120 




80$: 


PERFORM 


, SETREG 




3242 


022260 


000 


001 






.BYTE 


000,001 




3243 


022262 


022556 








SYNC 






3244 


022264 


1 77775 








-3 






3245 


022266 


004537 


022120 




81$: 


PERFORM 


, SETREG 




3246 


022272 


004 


005 






. BYTE 


004,005 




3247 


022274 


027560 








RXBA 






3248 


022276 


177777 








-1 






3249 


022300 


004537 


022120 






PERFORM 


, SETREG * 




3250 


022304 


010 


011 






. BYTE 


010,011 




3251 


022306 


023560 








TXTAB 






3252 


022310 


030160 








RXTAB 






3253 


022312 


004537 


022120 






PERFORM 


.SETREG 




3254 


022316 


013 


012 






.BYTE 


013,012 




3255 


022320 


000004 








BIT2 






3256 


022322 


000001 








BITO 






3257 


022324 


032737 


004000 


001236 




BIT 


#ASYNC , STAT 


;#IS THIS ASYNC LINE CARD? 


3258 


022332 


001412 








BEQ 


60$ 


;#BR IF NO. 


3259 


022334 


004537 


022164 






PERFORM 


, LOAD. MODE 


;#LOAD PARAMETERS. 


3260 


022340 


020000 








BIT13 




; ^RECEIVER ENABLE 


3261 


022342 


004537 


022164 






PERFORM 


, LOAD. MODE 


;# ' 


3262 


022346 


015000 








<BIT12+BIT11>+BIT9 


;#8 BITS/PER/CHAR 


3263 


022350 


004537 


022164 






PERFORM 


, LOAD. MODE 


\# 


3264 


022354 


072000 








<BIT14+BIT13+BIT12>+BIT10 


3265 
















; #9600 BAUD. 


3266 


022356 


000405 








BR 


61$ 




3267 


022360 


004537 


022164 




60$:' 


PERFORM 


, LOAD. MODE 




3268 


022364 


034000 








BIT13+BIT12+BIT11 




3269 


022366 


004537 


021706 






PERFORM 


, SETSYNC 


;GET SYNC CHARS AND ADJUST FOR 


3270 


022372 


000207 






61$: 


RTS 


PC 




3271 


















3272 


















3273 


022374 








S&TSCAN: 








3274 


022374 


01 0346 








MOV 


R3,-(SP) 




3275 


022376 


052777 


000010 


156756 




BIS 


#BIT3,©DVSCR 




3276 


022404 


01 2503 








MOV 


(R5)+,R3 




3277 


022406 


001414 








BEQ 


2$ 




3278 


022410 


01 2777 


050102 


156762 


1$: 


MOV 


#BIT14+BIT12+BIT6+BIT1 .©DVSFR 


3279 


022416 


104415 








ROMCLK 






3280 


022420 


005201 








INC 


R1 




3281 


022422 


01 2777 


050102 


156750 




MOV 


#BIT14+BIT12+BIT6+BITl.e»DVSFR 


3282 


022430 


104415 








ROMCLK 
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SEQ 0074 



3283 


022432 


005201 




3284 


022434 


005303 




3285 


022436 


001364 




3286 


022440 


01 2603 




3287 


022442 


010100 




3288 


022444 


000241 




•32B9 


022446 


006000 




3290 


022450 


000205 




3291 








3292 


022452 


000042 




3293 


022556 


000001 




3294 


022560 


000400 




3295 


023160 


000400 




3296 


023560 


000400 




3297 


0241 60 


000400 




3298 


024560 


000400 




3299 


0251 60 


000400 




3300 


025560 


000400 




3301 


0261 60 


000400 




3302 


026560 


000400 




3303 


0271 60 


000400 




3304 


027560 


000400 




3305 


0301 60 


000400 




3306 


030560 


000400 




3307 


031 1 60 


000400 




3300 


031560 


000400 




3309 


032160 


000400 




331 


032560 


000400 




331 1 


0331 60 


000400 




331 2 


033560 


000400 




3313 


0341 60 


OiOOOO 




3314 


0341 62 


043377 


042522 




03421 2 


051377 


041505 




034247 


377 


051 124 




034307 


377 


042522 




034333 


377 


054105 




W w*t www 


000003 




331 5 


034370 


006 


004 


3316 


034372 


001272 




331 7 


034374 


006 


002 


331 8 


034376 


001270 




331 9 


034400 


002 


001 


3320 


034402 


001260 




3321 








3322 


034404 






3323 


034404 


000000 




3324 


034406 


000000 




3325 


034410 


000000 




3326 


034412 


034162 




3327 


034414 


034333 




3328 


034416 


034366 




3329 


034420 


034212 




3330 


034422 


034333 




3331 


034424 


034366 




3332 


034426 


034247 





EM3! 



• EVEN 
DT1 : 



R1 
R3 
1$ 

(SP)+,R3 
R1 ,R0 

RO 



REGBUF: 
SYNC: 

txbap: 

TXBAS: 
TXTAB: 



RXBA: 

rxtab: 



INC 
DEC 
BNE 
MOV 
MOV 
CLC 
ROR 
EXIT 

. BLKW 
. BLKW 
. BLKB 
. BLKB 
. BLKB 
. BLKB 
.BLKB 
.BLKB 
. BLKB 
. BLKB 
.BLKB 
. B LKB 
.BLKB 
.BLKB 
.BLKB 
.BLKB 
.BLKB 
.BLKB 
. BLKB 
.BLKB 
. BLKB 


•ASCIZ <377>/FREE RUNNING ROM TESTS/ 
.ASCIZ <377>/RECEIVSR CONTROL BYTE TEST./ 
.ASCIZ <377>/TRANSMITTER CONTROL BYTE TEST./ 
.ASCIZ <377>/RECElVER BCC ERROR/ 
.ASCIZ <377>/EXPECTED FOUND LXNE(8)/ 

3 

. BYTE 6,4 
SAVR5 

. BYTE 6,2 
SAVR4 

. BYTE 2,1 
SAVRO 



34. 

400 
400 
400 
400 
400 
400 
400 
400 
400 
400 
400 
400 
400 
400 
400 
400 
400 
400 
400 



.ERRTAB: 







EM1 
DH1 
DT1 
EM2 
DH1 
DT1 
EMS 



{HALT 1 
{HALT 2 
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3333 


034430 


034333 


DH1 


J HALT 3 


3334 


034432 


034366 


DT1 


3335 


034434 


034307 


EM4 




3336 


034436 


034333 


DH1 


! HALT 4 


3337 


034440 


034366 


DT1 




3338 






• • D< ^nfftfidoititiititii^mtDtiHaittKiHilK^i^i^^i^i^t^i^i^iili^iiliitt I«i4t4i4ii|i*«|ia|i4i4i4i4t4i4i4(4«i|ii|i4i4i4i4ii|i4mit|ii|ii|t4i^i|i4i4i4i«|ii|i4i4i 


3339 


034442 




CORMAX: 




3340 




000001 


.END 
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USER SYMBOLS 



SEQ 0076 



ADRCNT= 


003443 


61 7* 


653* 


6620 






















ALU 


010000 


730 


























ASYNC = 


004000 


81# 


1260 


1338 


1357 


1380 


1462 


1481 


1504 


1615 


1627 


1646 


1678 


2046 


2277 
3074 


2304 
3086 


2417 
3105 


2444 
3138 


2596 
3234 


2619 
3257 


2744 


2767 


2886 


2909 


2953 


2964 


2977 


AUTO. S 


006622 


1 1 270 


























BCC = 


060000 


780 


























BCCFBK 


022114 


31 67* 


31 73* 


31 76* 


3179 


3183 


31950 
















BI NWRD 


003746 


703* 


704 


741# 






















BITO = 


00000 1 


71 


884 


1273 


1 503 


1645 


2068 


2143 


2156 


2298 


2329 


2438 


2469 


2766 






2801 


2808 


2881 


2908 


3071 


3104 


31 71 


3256 












BIT1 = 


000002 


700 
2972 


884 
3278 


895 • 
3281 


1914 


2068 


2329 


2469 


2549 


2723 


2725 


2801 


2808 


2970 


BIT1 = 


002000 


6 '> :i 


834 


1265 


1387 


151 1 


1653 


2299 


2302 v 


231 1 


2439 


2442 


2451 


2564* 






2565* 


2566* 


2567* 


2568* 


2574* 


2575* 


2576* 


2577* 


2578* 


2626 


2774 


2916 


3112 






3264 


























BIT11 = 


004000 


600 


884 


1263 


1269 


1385 


1391 


1509 


1515 


' 1651 


1657 


2309 


2315 


2449 




2455 


2624 


2630 


2772 


2778 


2914 


2920 


31 10 


31 16 


3262 


3268 






BIT12 = 


010000 


590 


73 


75 


77 


79 


1263 


1265 


1269 


1385 


1387 


1391 


1509 


1511 






1 51 5 


1651 


1653 


1657 


2309 


231 1 


2315 


2323 


7.449 


2451 


2455 


2463 


2624 






2626 


2630 


2772 


2774 


2778 


2824 


2914 


2916 


2920 


3110 


31 12 


31 16 


3262 






3264 


3268 


3278 


3281 




















BIT13 = 


020000 


580 


74 


75 


78 


79 


"1265 


1273 


1281 


1383 


1387 


1391 


1507 


1511 




1 515 


1649 


1653 


1657 


2299 


2302 


2307 


2311 


2315 


2439 


2442 


2447 


2451 






2455 


2622 


2626 


2630 


2770 


2774 


2778 


2912 


2916 


2920 


2980 


3108 


31 12 






31 16 


3137 


3260 


3264 


3268 


















BIT14 = 


040000 


570 


/6 


77 


78 


79 


524 


1265 


1387 


1511 


1653 


2186 


2299 


2302 






231 1 


2323 


2439 


2442 


2451 


2463 


2626 


2774 


2824 


2916 


2994 


31 12 


3264 






3278 


3281 
























BIT15 = 


1 00000 


560 


2282 


2287 


2291 


2299 


2302 


2422 


2427 


2431 


2439 


2442 


3217 




BIT2 = 


000004 


69* 


451 


884 


1254 


1378 


1502 


1644 


2299 


2329 


2439 


2469 


2618 


2728 






2737 


2765 


2801 


280B 


2907 


2982 


3103 


3255 












BIT3 = 


000010 


680 
2766 


884 
3275 


1738 


1770 


1792 


2257 


2273 


2298 


2397 


2413 


2550 


2719 


2737 


BIT4 n 


000020 


670 


1607 


1608 


1792 


2298 


2731 


2736 


2766 


3208 










BIT5 = 


000040 


660 


1293 


1869 


1 9/5 


1979 


2068 


2560 


2562 


. 2564 


2566 


2567 


2568 


2570 






2572 


2574 


2576 


2577 


2578 


2728 


2737 


3130 


3208 










BIT6 = 


000100 


650 


1195 


1975 


1979 


2068 


2152 


2156 


2179 


2561 


2562 


2565 


2566 


2567 






2568 


2571 


2572 


2575 


2576 


2577 


2578 


2728 


2737 


2908 


3104 


3278 


3281 


BIT7 = 


000200 


640 


518 


765' 


9.22 


943 


1195 


1975 


' 2563 . 


• 2564 ■ 


256.5 


2566 


2567 


2568 






2573 


2574 


2575 


2576 


2577 


2578 


2728 


2737 


2969 










BIT8 = 


000400 


630 
2577* 


884 
2578* 


• 901 
2708 


2173 
2983 


2250 
3131 


2561* 


2563* 


2565* 


2567* 


2568* 


2571* 


2573* 


2575* 


BIT9 r 


001000 


620 


884 


1 195 


1200 


1263 


1385 


1509 


1651 


2250 


2309 


2449 


2562* 


2563* 






2566* 


2567* 


2568* 


2572* 


2573* 


2576* 


2577* 


2578* 


2624 


2708 


2772 


2914 


3110 






3262 


























BRB 


070000 


790 


























BRW 


003014 


457 


5460 
























BRX 


003016 


458 


5470 
























CALBCC 


0221 16 


1754* 


1760 


1776* 


1782 


1798* 


1804 


3189* 


31960 












CHRCNT 


003744 


701* 


705 


72 I* 


■ 7390 


740 


















CLKX 


001242 


1500 


























CLK.A 


001412 


2500 


1045 
























CLK.B 


001413 


2510 


1050 
























CLK.C 


001414 


2520 


1055 
























CLK.D 


001415 


2530 


1060 
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CNVRT = 


104411 


2090 


CONVRT= 


104410 


2070 


CQRMAX 


034442 


33390 


CRC.CC= 


102010 


1799 


CRC16 = 


12000.1 


1777 


CREAM 


001 306 


1710 


CSRMAP 


006624 


41 


CYCLE 


005666 


460 


DATA 


034160 


33130 


DATABP 


004276 


791* 


DATACL= 


1 04416 


2190 


DATAHD 


004264 


790* 


DELAY = 


104414 


2150 


DEVADR 


003440 


615* 


DM1 


034333 


33140 


DT1 


034366 


33140 


DVACTV 


001300 


1650 


DVCROO 


001 500 


2810 


DVCR01 


001524 


2920 


DVCR02 


001550 


3030 


DVCR03 


001574 


3140 


DVCR04 


001620 


3250 


DVCR05 


001644 


3360 


DVCR06 


001670 


3470 


DVCR07 


001714 


3580 


DVLCR 


001370 


2330 


DVNSR 


001402 


2380 


DVNUM 


001301 


1660 


DVRIC 


001366 


2320 


DVRLVL 


001354 


2270 


DVRVEC 


001352 


2260 


DVSCR 


001362 


2300 






1659* 






1982 






2786* 






3275* 


DVSCRH 


001364 


2310 


DVSFR 


001400 


2370 


DV3RA 


001376 


2360 






1990 






2648 : 






3210* 


DVSRS 


001372 


2340 



CROSS REFERENCE TABLE 



DVSRSH 001374 



DVTLVL 
DVTROO 
DVTR01 
DVTR02 
DVTR03 
DVT R 04 
DVTR05 
DVTR06 
DVTR07 



001360 
001502 
001526 
001552 
001576 
001622 
001646 
001672 
001716 



2416* 
2350 
1993* 
2652* 
2290 
2820 
2930 
3040 
3150 
3260 
3370 
3480 
3590 



476 


478 


480 


482 


416 


818 






3340 








31990 








31980 








385* 


992* 


993 


995* 


11290 








496 


497 


9820 




794 


816 


8190 




812 


8150 






1275 


1663 


2161 


2934 


650 


6600 






3327 


3330 


3333 


3336 


3328 


3331 


3334 


3337 


432* 


433 


982 


987 



901* 
1031* 

381 
1019* 
1036* 
503 
500 
1661 
2069* 
2787 

101 7* 
1029* 

882 
1994 
2653 

881 
2595* 
1025* 
1997* 
2657* 
1040* 



902 
1032* 

486 
1020* 
1037* 
1007* 

878* 
1749* 
2070 
2930* 

1018* 

1030* 

1027* 

1998 

2658 

1023* 
2743* 
1026* 
2067* 
2799* 
1041* 



1019 

1031 

1028* 

2068* 

2800 

1024* 

2885* 

1027 

2151* 

2806* 

1272* 



USER SYMBOLS 
802 804 860 917 



SEQ 0077 



1000 1001* 1002 1005* 



2941 2987 3222 



1161* 1167* 1168* 1172 1191 



1021* 


1022* 


1023 


3216* 


3217* 


3220 


1033 










1 133* 


1 154* 


1155 


1 162 


1164 




1021 


2169 


2187 


2320 


2460 


2825 


1038 


2155* 








1 036 : 


2154* 










891* 


895* 


1006* 


1017 


1273* 


1281* 


1750 


1771* 


1772 


1793* 


1794 


1858* 


2156* 


2173* 


2179* 


2182 


2317* 


2318 


2932 


2939 


2983* 


2985 


3124* 


3125 



1393* 
1859 
2457* 
3127 



1394 
1924* 
2458 
3131 * 



1517* 
1925 
2631* 
3132 



1518 
1981* 
2632 
3208* 



3278* 
1029 
2152* 
2807 

1025 

3073* 

1284* 

2327* 

2812* 



3281* 
1285 
2328 
2813 

1247* 
3233* 
1752* 
2333* 
2817* 



1753 


1775 


1797 


1862 


1934* 


1979* 


1986 


2334 


2340 


2344 


2468 


2474 


2480 


2484 


2818 


2969* 


2970* 


2972* 


2982* 


3130* 


3207* 


1353* 


1477* 


1612* 


1743* 


1765* 


1787* 


2276* 


1774* 


1796* 


1861* 


1933* 


1978* 


1985* 


1989* 


2339* 


2343* 


2467* 


2473* 


2479* 


2483* 


2647* 


2968* 


2971* 


2981* 


3129* 


3206* 


3209* 
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USER SYMBOLS 



SEO 0078 



DVTVEC 


001 356 


2280 


1 038* 


1 039* 


1 040 


DV . END 


001 740 


3690 


993 


1 002 


1 131 


DV .MAP 


001 500 


171 


2800 


385 


412 


DVOO . A 


001504 


2830 








DVOO . B 


001510 


2850 








DVOO . C 


001514 


2870 








DVOO . D 


001 520 


2891 








DV01 . A 


001 530 


2940 








DV01 . B 


WW 1 iJ O *t 


2960 








DV01 . C 


001 540 


2981 








DV01 . D 


001 544 


3000 








DV02 . A 


001 554 


3050 








DV02. B 


001 560 


3070 








DV02 . C 


001 564 


3090 








DV02. D 


001 570 


3110 








DV03 . A 


001 600 


31 60 








DV03. B 


001 604 


31 80 








DV03 . C 


001610 


3200 








DV03 . D 


001614 


3220 








DV04 . A 


001 624 


3270 








DV04 . B 


001630 


3290 








DV04 . C 


001 S*34 


331 








DV04 . D 


001 fidO 

WW 1 W*TW 


3330 








DV05 . A 


001 650 


3380 








DV05 . B 


001 654 


3400 








DV05 . C 


001 660 


3420 








DV05 . D 


001 664 


3440 








DV06 • A 


001674 


3490 








DV06 . B 


001700 


351 








DV08.G 


00 1 704 


3530 








DVOi. D 


001710 


3550 








DV07 ■ A 


001 720 


3600 








: DV07 1 § 


001 724 


3620 








DV07, C 


00 1 730 


36«t./ 








DV07. D 


001 734 


3660 








DV1 1QN 


022224 


1 744 


1 766 


1788 


1 353 


EM1 


0341 62 


33140 


3326 






EM2 


03421 2 


331 40 


3329 






EMS 


034247 


331 40 


3332 






IM4 


034307 


331 40 


3335 






ERRCNT 


001 232 


1 420 


337* 


509 


827* 


ERRFLG 


001311 


1 770 


383* 


471 * 


538* 


ERRMSG 


004252 


789* 


807 


81 00 




ERTA80 


004366 


804 


8360 






EX IT ? 


000205 


810 


31 60 


321 3 


3227 


EX ITER 


004322 


122 


8270 






FIX. 00 


006516 


1046 


1U81 


1056 


1061 


HALTS 


004302 


775 


8210 






HIL1M 


003436 


614* 


641 


6590 




ICOUNT 


001222 


13S0 


536 


541* 




INBUF 


005520 


584 


620 


9670 




INIFLG 


001310 


1760 


392 


407* 




INSTERs 


104404 


1990 


635 






INSTR * 


104403 


1970 


1068 






INSTR2 


003236 


591 


6030 






LIGHT 


000174 


1100 


402 







1018 



779* 



3290 
10950 



1977 



792 



2060 



2146 



861* 
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USER SYMBOLS 



SEO 0070 



LIGHTS 


001200 


1210 


402* 


473* 






















LIMITS 


003364 


630 


6410 
























LOAD.M 


022164 


1232 


1264 


1268 


1382 


1384 


1336 


1390 


1506 


1508 


1510 


1514 


1648 


1650 






1652 


'165* 


2306 


2308 


2310 


2314 


2446 


2448 


2450 


24S4 


2621 


2623 


2625 






2629 


2769 


2771 


2773 


2777 


2911 


2913 


2918 


2919 


2966 


2979 


3107 


3109 






3111 


3115 


32150 


3259' 


3261 


3263 


3267 














LOBITS 


003442 


616* 


645 


6610 


662 




















LOCK 


001220 


1370 


540* 


554 


558 


793 


1240* 


1341* 


1465* 


1893* 


1735*, 


1845* 


1912* 


1972* 






2049* 


2131* 


2249* 


2392* 


2544* 


2707* 


2879* 


3064* 












LOGICA 


002560 


107 


4900 
























LOKFLG 


001312 


1780 


























LOLIM 


003434 


613* 


643 


6580 






















LPCNT 


001224 


1390 


535* 


536 


53S* 




















LRC8 ■ 


000200 


175E 


31970 
























LSTERR 


001234 


1430 


388* 


470* 


522* 


776 


77S* 


862* 














LOO. 03 


001416 


2550 


1008* 


1043 


1223 


1318 


1442 


1575 


1718 


1828 


1895 


1955 


2026 


2114 






2232 


2375 


2527 


2690 


2862 


3044 
















L04.07 


001420 


2560 


1010* 


1048 


1227 


1323 


1447 


1580 


1722 


1832 


1899 


1959 


2031 


2118 






2236 


2379 


2531 


2694 


2866 


3049 
















LOS. 11 


001422 


2570 


1012* 


1053 


1231 


1328 


1452 


1585 


1726 


1836 


1903 


1963 


2036 


2122 






2240 


2383 


2535 


2698 


2870 


3054 
















L12.15 


001424 


2580 


1014* 


1058 


1235 


1333 


1457 


1590 


1730 


1840 


1907 


1967 


2041 


2126 






2244 


2387 


2539 


2702 


2874 


'3059 
















MASKX 


001244 


1510 


1317* 


1322* 


1327* 


1332* 


1410 


1441* 


1448* 


1451* 


1456* 


1S34 


1574* 


1579* 






1584* 


1589* 


1683 


2025* 


2030* 


2035* 


2040* 


2080 


3043* 


3048* 


3053* 


3058* 


3142 


MASK. A 


001406 


24S0 


1044 


1317 


1441 


1574 


2025 


3043 












MASK . B 


001407 


2460 


1049 


1322 


1446 


1579 


2030 


3048 














MASK.C 


001410 


2470 


1054 


1327 


1451 


1584 


2035 


3053 














MASK . D 


00141 1 


2480 


1059 


1332 


1456 


1589 


2040 


3058 














MASTEK 


005400 


800 


9580 
























MCRLF 


005104 


569 


692 


796 


797 


805 


946 


9580 


1067 


1085 










MCSRX 


005330 


475 


9580 






















MDATA ' 


005624 


719 


729 


9710 






















MEPASS 


005145 


474 


9580 
























MERRPC 


005454 


803 


9580 
























MERRX 


005355 


481 


9580 
























MERR2 


005174 


9580 


984 


1174 






















MERR3 


006243 


429 


9580 
























MLOCK 


005301 


453 


9580 
























MNEW 


005402 


424 


9580 
























MPASSX 


005344 


479 


'9580 
























MPPAIL 


005107 


859 


9580 
























MOM 


005100 


599 


9580 


1090 






















MR 


005171 


461 


9580 
























MRESET* 


004000 


810 


878 


891 






















MSTCLRa 


104412 


2110 


863 


1290 


1420 


1B44 


1692 


1742 


1764 


1786 


1867 


1932 


2001 


2091 






2201 


2662 


3019 


3146 




















MTITLE 


001000 


1190 


406 
























MTSTN 


005366 


801 


8580 


1069 






















MTSTPC 


005267 


9580 


























MVECX 


005336 


477 


9580 
























NEXT 


001216 


1360 


542 


832 


1221* 


1315* 


1439* 


1872* 


1716* 


1826* 


1893* 


1983* 


2023* 


2112* 






2230* 


2373* 


2525* 


2688* 


2860* 


3041* 
















NOLIST" 


****** u 


1 


























NPR m 


040000 


760 


























PARAM * 


104405 


2010 


1070 
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- USER SYMBOLS 



seo 0080 



PARAM1 


003304 


619* 


636 








PARBI T= 


■■ 040000 


81* 


1114 








PARERR 


003360 


622 


624 


626 


635* 


642 


PASCNT 


001230 


1410 


382* 


472* 


473 


506 


PERFOR= 


004537 


810 


1248 


1252 


1 256 


1262 






1384 


13H6 


1390 


1 392 


1 483 






1516 


161 7 


1622 


1 629 


1 634 






1767 


1789 


1854 


1 919 


2063 






2308 


231 


2314 


231 6 


2419 






2454 


2456 


2553 


2598 


2603 






2751 


2755 


2759 


2763 


2769 






2905 


291 1 


2913 


2915 


2919 






3093 


3097 


3101 


3107 


3109 






3259 


3261 


3263 


3267 


3269 


PFTAB 


004470 


860 


866* 








POPRO = 


012600 


55* 


826 








P0P1SP= 


005726 


55* 










PQP2SP= 


022626 


55* 


544 








PS 


177776 


530 


378* 


447* 


1 194* 


1270* 


PUSHRO= 


010046 


55# 


823 








PUSH1S= 


005746 


55* 










PUSH2S= 


024646 


55* 










QV. FLG 


001313 


179* 


384* 


485* 


533 




RAM 


020000 


74* 










RAMCLR* 


104413 


2130 


864 


1241 


1342 


1466 






2347 


2393 


2487 


2545 


271 1 


REGBUF 


022452 


3292* 










RESREG 


004300 


817 


820* 








RESTAR 


004414 


847 


853* 








RESTRT 


002572 


484 


488 


496* 






RESV16 


001404 


239* 


1033* 


103s* 






RES05 = 


104407 


205* 


820 








RETURN 


001214 


135* 


390* 


460* 


462 


496* 


ROMCLKx 


104415 


217* 


3279 


3282 






RUN 


001304 


169* 


386* 


987 


990* 


991 * 


RXBA' 


027560 


1354* 


1355* 


1356* 


1370 


1 398 






1536 


161 3* 


1614* 


1 631 


1 636 






2073 


2081 


2086 


2191 


2290 






2757 


2789 


2899 


2921* 


2922* 


RXTAB 


030160 


1344 


1375 


1468 


1499 


1607* 






2142 


2271 


2295 


241 1 


2435 






2577* 


2578* 


2614 


271 3 


2729* 






2762 


2881* 


2882* 


2883* 


2904 


SAVACT 


001302 


167* 


42' 


1 1 72* 






SAVNUM 


001303 


1680 


381* 


483* 


486* 


1165* 


SAVPC 


001276 


164* 


667* 


838 




SAVRO 


UU I JL D V 






681 


3320 




SAVR1 


001262 


158* 


675* 


682 






SAVR2 


001264 


159* 


674* 


683 






SAVR3 


001266 


160* 


673* 


684 






SAVR4 


001270 


1 61 # 


672* 


685 


3318 




SAVR5 


001272 


162* 


671* 


686 


3316 




SAVSP 


001274 


163* 










SAV05 = 


104406 


. 20a* 


780 








SCOPE = 


104400 


191* 


1238 


1336 


1460 


1593 






2542 


2705 


2877 


3062 
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644 

1264 
1488 
1638 
2147 
2424 
2607 
2771 
2929 
3111 



1596 
2829 



646 

1268 
1492 
1642 
2279 
2428 
261 1 
2773 
2955 
3115 



1359 
1496 
1648 
2284 
2432 
2615 
2777 
2960 
3123 



1364 
1500 
1650 
2288 
2436 
2621 
2779 
2966 
3236 



1368 
1506 
1652 
2292 
2440 
2623 
2888 
2979 
3241 



1372 
1508 
1656 
2296 
2446 
2625 
2893 
3076 
3245 



1376 
1510 
1658 
2300 
2448 
2629 
2897 
3081 
3249 



1276* 1282* 2153* 



1736 
2880 



1846 
3065 



2247 



1382 
1514 
1745 
2306 
2450 
2746 
2901 
3088 
3253 



542* 


545 


832* 


834 


865 


1084* 


1092* 


1093 


298* 


999* 














1403 


1412 


1478* 


1479* 


1480* 


1494 


1522 


1527 


1669 


1674 


1684 


1688 


1923* 


1927 


2061* 


2062* 


2430 


2579 


2609 


2635 


2739* 


2740* 


2741* 


2742* 


2998 


3090 


3095 


3247 


3304* 




1608* 


1609* 


1610* 


1641 


1738* 


1852* 


1916* 


1976* 


2547 


2570* 


2571* 


2572* 


2573* 


2574* 


2575* 


2576* 


2730* 


2731* 


2732* 


2733* 


2734* 


2735* 


2736* 


2737* 


3067 


3071* 


3100 


3252 


3305* 
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SC0P1 = 104401 



SERV.G 004640 
SETREG 022120 



SETSCA 022374 

SETSYN 021706 

SIMBCC 021740 

SPACNT= 003745 

SSWR 000176 

STACK = 001200 

STAT 001236 



SV05 
SWR 



swoo = 

SW01 = 

SW02 = 

SW03 = 

SW04 = 

SW05 = 

SW06 = 

SW07 = 

SW08 = 

SW09 = 

SW10 = 

SW11 = 

$m 2 = 

SW13 = 

SW14 = 

SW15 = 

SYNAOO, 

SYNA01 

SYNA02 

SYNA03 

SYNA04 

SYNA05 

SYNA06 

SYNA07 

SYNBOO 

SYNB01 

SYNB02 

SYNB03 



003452 
001202 



000001 
000002 
000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
002000 
004000 
OJ 0000 
020000 
040000 
100000 
001506 
001532 
001556 
001602 
001626 
001652 
001676 
001722 
001512 
001536 
001562 
001606 



193* 
2663 
521 
1248 
1617 
2279 
2603 
2905 
3249 
3273* 
1392 
1756 
702* 
112* 
54* 
148* 
1408 
1627 
1903* 
2059 
2304 
2596 
2886 
3105 
671* 
123* 
762 
1062 
.34* 
33* 
32* 
31* 
30* 
20 1 
28* 
27* 
26* 
25* 
24* 
23* 
22* 
21* 
20* 
19* 
284* 
295* 
306* 
317* 
328* 
339* 
350* 
361* 
286* 
297* 
308* 
319* 



1291 
2830 
768 
1252 
1622 
2284 
2607 
2955 
3253 

1516 
1778 
723 
403 
379 
1223* 
1442* 
1646 
1907* 
2078 
2375* 
2619 
2909 
3138 

398 
769 

422 
1062 



828 
552 
830 
531 
565 
774 



1421 


1545 


1693 


1803 


1874 


1935 


2002 


2092 


2202 


2348 


2488 


3020 


3147 




















912* 


913 




















1256 


1359 


1364 


1368 


1372 


1 376 


1483 


1488 


1492 


1496 


1500 


1629 


1634 


1638 


1642 


1745 


1767 


1789 


1854 


1919 


2063 


2147 


2288 


2292 


2296 


2300 


2419 


2424 


2428 


2432 


2436 


2440 


2598 


261 1 


2615 


2746 


2751 


2755 


2759 


2763 


2888 


2893 


2897 


2901 


2960 


3076 


3081 


3088 


3093 


3097 


3101 


3202* 


3236 


3241 


3245 


1658 


2316 


2456 


2553 


2779 


2929 


3123 


3154* 


3269 






1800 


3161* 




















726* 


740* 




















448 


833 


855 


















1227* 


1231* 


1235* 


1260 


1318* 


1323* 


1328* 


1333* 


1338 


1357 


1380 


1447* 


1452* 


1457* 


1462 


1481 


1504 


1575* 


1580* 


1585* 


1590* 


1615 


1678 


1718* 


1722* 


1726* 


1730* 


1828* 


1832* 


1836* 


1840* 


1895* 


1899* 


1955* 


1959* 


1963* 


1967* 


2026* 


2031* 


2036* 


2041* 


2046 


2054 


2058 


21 14* 


21 18* 


2122* 


2126* 


2232* 


2236* 


2240* 


2244* 


2250 


2261 


2277 


2379* 


2383* 


2387* 


2401 


2417 


2444 


2527* 


2531* 


2535* 


2539* 


2555 


2690* 


2694* 


2698* 


2702* 


2708 


2744 


2767 


2862* 


2866* 


2870* 


2874* 


2946 


2947 


2953 1 


2964 


2977 


3044* 


3049* 


3054* 


3059* 


3074 


3086 


3155 


3157 


3234 


3257 
















403* 


408 


422 


427 


432 


451 


515 


524 


531 


552 


565 


774 


821 


828 


830 


914 


915* 


925* 


• 930* 


931* 


932* 


939* 
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CROSS REFERENCE 


TABLE — 


SYNB04 






330* 










SYNB05 


no 1 RRfi 

V U 1 U SO 




341* 










SYNB06 


001 702 




3520 










SYNB07 


001 726 




363* 








2426 


SYNC 






1366 


1490 


1624 


2286 








3243 


3293* 








SYNCX 


001 240 




149* 










SYNCOO 


001516 




288* 










SYNC01 


00 1 542 




299* 










SYNC02 


001 566 




310* 










SYNC03 


001612 




321* 










SYNC04 


001 6 3D 




332* 










SYNC05 


001 662 




3430 










SYNC66 


001 706 




354 V 










SYNC07 


001 732 




365* 










SYNC2A 


001 426 




260* 


1009* 








SYNC2B 






261* 


101 1* 








SYNC2C 


00 1 432 




262* 


101 3* 








SYNC2D 


001 434 




263* 


1 01 5* 








SYNDOO 


l\ A H CIO 




290* 










SYND01 


001 546 




301* 










SYND02 


001 572 




312* 










SYND03 


001616 




323* 










SYND04 


001 642 




334* 










SYN005 


01 DOS 




345* 










SYND06 






356* 










SYND07 


UU 1 / i]u 




367* 










S.C » 


050000 




77* 










TEMP 


UU3DQ-i 




706 


856* 


857* 


969* 




TEMPI 


001 246 




152* 


412* 


413 


418* 




TEMP2 


001 250 




153* 


413* 


414 


962 


31 65* 


T EMP3 


001 252 




154* 


2791* 


2797* 


31 66* 


3168 


TEMP4 ' 


001 254 




155* 










TEMP5 


001 256 




156* 










TKCSR 


001 204 




127* 


527 


586 


912 


919 


TKDBR 


no 1 onfi 

UU 1 ^Uu 




128* 


51 7 


529 


588 


594 


TLAST " 


0211 42 




1088 


3314* 








TPCSR 


001210 




129* 


570 


592 


771 


una 

926 


TPDBR 


001212 




130* 


,572* 


594* 


773* 


928* 


TRPOK 


UU J / 0* 




752* 




641 


688 




TSTNO 


001 226 




,1,40* 


'389* 










1892* 


1952* 


2022* 


21 1 1 * 


2229* 


TST1 


w U / 4 9 w 




1076 


1092 


1220* 






TST10 


1 3244 




1693 


1952* 








TST1 1 


1 3554 




1953 


2022* 








TST12 


01 41 66 




2023 


2111* 








TST1 3 


014050 




2112 


2229* 








TST14 


015442 




2230 


2372* 










016222 




2373 


2524* 








TST16 


017166 




2525 


2687* 








T ST 1 7 


020144 




2688 


2859* 








TST2 


007684 




1221 


1314* 








TST20 


021142 




2860 


3040* 


3314 






TST21 ■ 


****** 


U 


3041 










TST3 


010430 




1315 


1438* 








TST4 


01 1174 




1439 


1571* 
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TABLE < 


TST5 


012004 


1572 


1715* 








TST6 


012512 


1716 


1825* 








TST7 


012772 


1826 


1892* 








TTST 


002702 


454* 


455* 


457* 


458* 


525* 


TWOSYN* 


010000 


8,1* . 


3157 








TX8AP 


022130 


1244* 


12S0 


1350* 


1351* 


1361 






1980* 


2053 


2136 


2265 


2281 






2923 


2945 


2957 


3078 


3117 


TXBAS 


023160 


3295* 










TXTAB 


023560 


1246* 


1255 


1343 


1374 


1487 






1851* 


191 4* 


1975* 


1976 


2258 






2561* 


2562* 


2563* 


2564* 


2565* 






2723* 


2724* 


2725* 


2728* 


2727* 


TYPDAT 


004266 


795 


813 


01 6* 






TYPE ■ 


104402 


195* 


406 


411 


424 


429 






582 


599 


692 


729 


796 






916 


918 


946 


934 


1067 


TYPMSG 


004166 


793 


796* 








VECMAP 


007102 


1173 


1181* 








WRDCNT 


003742 


700* 


730* 


738* 






WRKO.F 


004254 


808 


81 1* 








XBX 


004060 


770 


772 


774* 






XCSR 


002604 


476 


498* 








XERR 


002626 


482 


507* 








XFR 


030000 


75* 










XHEAD 


005461 


41 1 


958* 








XPASS 


002620 


480 


504* 








XPOLY 


0221 12 


1755* 


1777* 


1799* 


3174 


3185 


XSTATQ 


005506 


417 


958* 








XTSTN 


004374 


802 


839* 








XVEC 


002612 


478 


501* 








SCRAP - 


177777 


1* 


1212* 


1216* 


1304> 


1310* 






1881* 


1888* 


1942* 


1948* 


2009* 






2520* 


2669* 


2683* 


2841* 


2855* 


$E B 


000022 


1* 


1221 


1222* 


1313 


1316* 






1893 


1894* 


1953 


1954* 


2023 


$N 




2526* 


2688 


2689* 


2860 


2861* 


000020 


1* 


1212 


1218 


1222* 


1304 






1700 


1713 


1717* 


1815 


1823 






2020 


2024* 


2099 


2109 


2113* 


$Y s 




2526* 


2669 


2685 


2689* 


2841 


000017 


1* 


182* 


191 


193* 


195* 






213* 


215* 


217* 


219* 


221* 




034442 


92* 


93 


96* 


103* 


104* 






166* 


167* 


168* 


169* 


170* 






288* 


289* 


290* 


292* 


293* 






303* 


304* 


305* 


306* 


307* 






317* 


318* 


319* 


320A 


321* 






331* 


332* 


333* 


334* 


336* 






345* 


347* 


348* 


349* 


350* 






360* 


361* 


362* 


363* 


364* 






872 


910* 


920 


927 


941 






1463 


1519 


1762 


1784 


1806 






225i 


2319 


2459 


2633 


2709 






2978 


2986 


2989 


3023 


3070 






3295* 


3296* 


3297* 


3298* 


3299* 



SEO 0082 

USER SYMBOLS 



2605 


2753 


2895 


2962 


3083 


3155* 


3156* 


3159* 


1191* 


1192* 


2636* 


2644* 


31 64* 


3187* 






3169* 
















3178* 


3180 


3185* 


3186* 


3189 








940 
















764 


921 


942 












1080 


■ 1 082 


1220* 


1314* . 


1438* 


1571* 


1718* 


1825* 


2372* 


2524* 


2667* 


2859* 


3040* 






















SEQ 


USER ! 


SYMBOLS 














1474* 


1475* 


1485 


1602 


1619 


1739* 


1850* 


1915* 


2405 


2421 


2585 


2600 


2634 


2748 


2781 


2890 


3236 


3294* 














1498 


1597* 


1598* 


1599* 


1600* 


1601* 


1640 


1737* 


2260 


2294 


2396 


2400 


2434 


2546 


2557 


2560* 


25664* 


2567* 


2568* 


2613 


2712 


2720* 


2721* 


2722* 


2728* 


2761 


2903 


3099 


3251 


3296* 






483 


461 


474 


475 


477 


479 


481 


569 


797 


800 


801 


803 


SOS 


809 


614 


8S9 


1085 


1090 


1174 












3184* 
















1 420* 


1434* 


1 552* 


1567* 


1 700* 


1711* 


1815* 


1 821 * 


201 3* 


2099* 


21 07* 


221 0* 


2225* 


2355* 


2368* 


2495* 


3027* 


3036* 














1 439 


1 440* 


1 572 


1573* 


1716 


1 717* 


1826 


1827* 


2024* 


2112 


211 3* 


2230 


2231 * 


2373 


2374* 


2525 


3041 


3042* 














1312 


1316* 


1 428 


1436 


1 440* 


1 552 


1569 


' 1573* 


1 827* 




1 890 


1894* 


1 942 


1 950 


1 954* 


2009 


221 


.2227 


2231 * 


2366 


2370 


2374* 


2495 


2522 


$£957 , 


2861 * 


3027 






3314* 






197* 


199* 


201* 


203* 


205* 


207* 


209* 


211* 


105* 


106* 


109* 


111* 


114* 


118* 


120* 


165* 


279* 


281* 


282* 


283* 


284* 


285* 


286* 


287* 


294* 


295* 


296* 


. 297* 


298* 


299* 


300* 


301* 


308* 


309* 


310* 


311* 


312* 


314* 


315* 


316* 


322* 


323* 


325* 


326* 


327* 


328* 


329* 


33b* 


337* 


338* 


339* 


340* 


341* 


342* 


343* 


344* 


351* 


352* 


353* 


354* 


355* 


356* 


358* 


359* 


365* 


366* 


367* 


431 


520 


767 


849 


858 


968* 


970* 


972* 


986 


1177 


1198 


1339 


1395 


1860 


1926 


1983 


1987 


2047 


2071 


2163 


2183 


2788 


2833 


2933 


2936 


2940 


2943 


2965 


2976 


3126 


3128 


3133 ' 


3139 


3150 


4 3292* 


3293* 


3294* 


3300* 


3301* 


3302*. 


3303* 


3304* 


3305* 


3306* 


3307* 
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SEO 0084 







3308* 


330 9# 


. BEGIN 


002332 


447# 




. CNVRT 


003542 


210 


693# 


.CONVR 


003536 


208 


692// 


. DATAC 


004576 


220 


898* 


. DELAY 


004476 


216 


869# 


• EOP 


002436 


469# 


3041 


. £rrta 


034404 


788 


3322# 


. HLT 


004002 


99 


761 # 


. INSTE 


003224 


200 


599# 


. INSTR 


003120 


198 


578# 


. INST1 


003140 


582# 


602 


.MSG 


003142 


580* 


583# 


.MSTCL 


004556 


212 


890# 


. PARAM 


003244 


202 


610# 


.PFAIL 


004402 


97 


380 


. RAMCL 


004516 


214 


877# 


. RES05 


003504 ' 


206 


681# 


. ROMCL 


004566 


218 


894# 


. SAV05 


003444 


204 


667# 


. SCOPE 


002634 


192 


5140 


. SC0P1 


003020 


194 


552# 


.START 


001742 


115 


378# 


. TRPSR 


003750 


101 


749# 


. TRPTA 


001314 


190# 


754 


.TYPE 


003044 


196 


562# 



3310* 331 1 # 
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SEO 0085 



DVEND 

DVFRNT 

HLT 



$ADJUS 

$BEAK 

SBUFFE 

$CK15 

$CK150 

SCLR.T 

$CYCLE 

$EOP 

SFINI 

$GETFL 

SGETPA 

SHEADE 

$LC16 

$LC16A 

$LC17 

$LC18 

$LC19 

$LC20 

$LC21 

$LC22 

$LC30 

SLC31 

$LC32 

$LC33 

$MSG 

$PFAIL' 

$RAMCL 

$RXSHI 

$SCOPE 

SSETAS 

$SETLI 

SSETSC 
SSETSY 
SSET.T 
$SILOI 
SSIMBC 
$TRPDE 

$TSTN 

$TXSHI 
SVARIA 
$XZ 



1# 
1# 
55# 
1763 
2197 
2796 
3225 
1# 
1# 



1# 
1# 



1# 
1942 
2855 



463 

907 
1 785 
2326 
2805 

1357 
1 742 
964 



973 
463 
3314 

1068 

1211 
1 303 
1 551 
1699 
1 941 
2008 
2098 
2209 
2494 
2669 
2840 
3026 
958 
842 
869 

510 
1260 
1 218 
3038 
3272 
3154 



316: 
191 

1218 
3038 

117 
' 212 
1948 
3027 



1279 
1807 
2332 
2811 

1481 
1764 



1289 
186C 
2337 
2816 

1615 
1786 



1401 


1406 


1417 


1525 


1530 


1541 


1666 


1672 


1677 


1687 


1691 


1931 


1988 


1992 


1996 


2000 


2077 


2085 


2090 


2164 


2172 


2190 


2342 


2346 


2466 


2472 


2477 


2482 


2486 


2643 


2650 


2656 


2661 


2821 


2828 


2937 


2944 


2990 


2997 


3003 


3008 


3013 


3018 


3145 


1627 


2277 


2417 


2596 


2744 


2886 


2953 


3074 


3086 


3234 





1380 
1312 



193 
1312 



1504 
1436 



195 
1436 



1216 1304 
2009 2018 
3036 



1646 
1569 



197 
1569 



1310 
2099 



2304 

1*713 



199 
1713 



1428 
2107 



2444 
1823 



201 
1823 



1434 
2210 



2619 
1890 



203 
1890 



1552 
2225 



2767 
1950 



205 
1950 



1567 
2355 



2909 
2020 



207 
2020 



1700 
2368 



3105 
2109 



209 
2109 



1711 
2495 



3257 
2227 



211 
2227 



1815 
2520 



213 
2370 



1821 
2669 



215 
2522 



1881 
2883 



217 
2685 



1888 
2841 



ABS. 034442 
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SEQ 0086 



ERRORS DETECTED: 
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